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Atari Hardware 


520 ST Keyboard ........ 340(500 
SM 314 DS Disk Drive ... $180(299 
Monochrome Monitor ..... 150(250 
20 MEG Hard Drive .. 625(799 
Avatek 1200 Modem .......... $81(199 
Blank Dises - 3.5" 
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InSoft’s Magazine on a Disk 
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6 months— $45 


InSoft’s C Tool Boxes 
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Search/Sort Tool Box— $59 
Graphic Tool Box—$59 
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Products Ordered Cost+5% S/H Total 
Membership—one year $50 


Mass. residents add 5% sales tax 
( Check or Money Order enclosed for............-- $ 
Name 
Address 
City 
Telephone 


State Zip 


Mp 


e e 
lications vases 
oe ae 


THE ATARI 520/1040ST JOURNAL 


Features: 
4 You're a Pirate & I'm a Slick Operator 
by Dick Biow 
6 A Sampler of German Software- 
by Maurice Kowalski & Bill Petry 
22 Diskette Control- 


by David Bessey 


MIDI- conducted by Richard Kaller 


12 MIDI Notes- News, etc. 
14 MIDI Beat- Reviews of EZ Track & 
ST Music Box 
Departments: 
18 FORTRAN as a Second Language / Mark Lovell 
26 A Step FORTH: / Albert Lew 
32 Not So, BASIC! / Eric Thornton 
35 First Machine Language Program / Tom McAllister 
38 You Can Do It! / David Bessey 
40 Let's "C' Now / David Stokes 
43 The Joys of Modula-2/ST / Sol Guber 
48 LOGO LOG / Leonard Kaplan 
51: Beginner's Corner / Tom Hawkins 
Reviews: : - 
yews Review-Review 
55 A Final Word in the Hand- Mark of the Unicorn 
The ST Review Board 
58 PECAN & Pro- Fortrans/ 
59 Leaderboard/ Access Software 
61 Personal Money Manager/ Michtron 
61 Multi Forth/ Creative Solutions Inc. 
62 Mach2 Forth/ Palo Alto Shipping 
64 Business Statistics/ Lionheart 
69 ST User Groups 
70 ST Bulletin Board Update 
71 ST New Software/Hardware 


5 T 4 pplications October 1986 


Cover Contest Winners 

Back in May we offered $100 to anyone who could 
come up with ortgina! artwork for our fall covers. 
Well, the response wasn't overwhelming. In all we 
received 6 entries from 5 people with a tle for 
first place. A flip of the colin chose this month's 
cover- Adrienne Badella'ts Checkmate. Next month our 
cover will display Marc Ritter's Expanding Atarl. 
The winners will recefve a check for $50, and our 
thanks. All other entrants will be offered a 
selected software package, and our thanks, 


Disk Edition Aval lable 

Belleve it or not ST Applications was originally 
intended to be a disk based magazine. It didn't 
take us long to realize that It would be difficult 
to share articles and programs on a disk Ina 
car-poo!l ride to work. Thus was born ST 
Applications In Its paper form, However, we have 
not abandoned our disk form. Every issue of ST 
Applications has been accompanied with a Support 
Disk, For the first four Issues (Sept. to Dec, 
1985) the disk verston contained both the text 
files of all the articles and programs In the 
printed magazine topped up with PD Programs etc, 
Starting with the Jan/Feb 1986 Issue we changed the 


Top Ten in Software Sales for August 1986 


dealer sales survey. Final figures will appear 
in our Monthly Dealer Survey Results, which is 
mailed free to participating dealers.) 


Silent Service- Microprose 
Leaderboard- Access Software 
Thunder- Batteries Included 
Time Bandit- Michtron 
Winter Games- Activision 
Flash- Antic Software 
Mean 18- Accolade 
Music Studio- Activision 
Sundog- FTL Games 

. Joust- Atari 
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(These are preliminary figures from our monthly 
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disk contents to be only the programs In the 
magazine. We then filled up the rest of the disk 
with PD programs etc., which were downloaded from 
various BBSs. 

Volume 1 (1985), therefore, contained 4 separate 
disk Issues. Volume 2 (1986), due to our Jan/Feb 
double month issue, will contain only 11 Issues, 


This month's disk fs #9. Volume 3 will start with 
the January 1987 issue, 


Pascal Editor 

Chris Robertson has notified us that he will no 
longer be able to give us his full monthly support. 
So, we are looking for a new Pascal editor tn 
residence to write monthly Installments espousing 
the virtues of Pascal, patiently answer letters 
from readers who look for a helping hand to get 
them up & Programming and accept only minimum 
Payment~ Please apply within, 


Thanks for a good first year, 


/3lb /2 
BIIl Petry 
Publisher 
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Bigger is better... 
Improve your 520ST 


with a ThoughtSpace one meg 
memory expansion board 


The TS-1A gives you greater speed and 
power, bigger documents and applications, 
more desk accessories, larger RAM disks, 
and full 1040ST software compatibility. There 
are no special programs to run or changes to 
the system software. 

Have it installed or do it yourself (it’s not 
hard with our detailed, illustrated instructions). 
You always get a complete, tested board 
with a_ utilities diskette and a one year 
guarantee. 

Contact your Atari dealer for information 
or write or call ThoughtSpace for literature. 
Dealer inquiries invited. 


ThoughtSpace 
Development 


2450 Warring St., No. 21 Berkeley, CA 94704 (415) 845-1415 


November 10-14, 1986 
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by Dick Biow 


You’re a Pirate 
and 


I’m a Slick Operator 


This article represents the views of Dick Biow and does not necessarily 
represent the views or opinions of ST Applications or its staff, 


The word, "piracy," can be taken to mean many association, ADAPSO, is trying to popularize the 


things but, in the business world, it means, "any idea that illicit copying is simple thievery, like 
Predatory practice." In the light of that shoplifting. Few consumers accept that viewpoint or 
detinition, the most flagrant examples of piracy in even take it seriously. Why? Why do the moral 

the field of computer software can be discovered Pronouncements of an organization represent ing 
among the software publishers, themselves, publishers have such low credibt lity? 

Consider, for example, those publishers who claim One reason, of course, is the arrogance of such 
fantastic performance in their promotional Preaching when contrasted with popular marketing 
literature and then deny all resposibility for Practices. Consider, for instance, the common use 
Performance in the shrink-wrap disclaimers that you of copy-protection by many publishers: the 
discover packaged with the program disks. Promising manipulation of software formats so as to 
you benefits in order to get your money and then Physically prevent backups. Hypocrisy here is too 
retracting those promises after getting your money evident to permit credibility: at one and the same 
is clearly a "predatory" business practice: ft fs time, these copy-protectors are (1)appealing to 
Piracy. your nobler instincts and (2)treating you like a 

But aren't shrink-wrap disclaimers legal? In many crook by forcibly trying to block you from dotng 
states, especially where publishers have lobbied the very thing they ask you not to do as a matter 
legislatures into compifance, the shrink-wrap of principle! 
gimmick stands up in court. That doesn't make It Are the folks who can produce such fine Programs 
ethical; it still fulfttis the detinition of really so illogical? That's unlikely. | believe 
Piracy, but now it has become legal piracy. (The they have been psyched by publishers of 
British pirate, Sir Francis Drake, carried a letter copy-protection programs into a sort of 
from Queen Elizabeth | of England, authorizing him anti-consumer hysterta. It has to be hysteria—-it 
to board and capture Spanish vessels. Drake was a can't be rational--because copy-protection doesn!t 
legaipirate, but his victims Probably missed the do a thing to defeat piracy, 
subtlety.) | personally have purchased five ditferent 

'f publishers practice piracy, what about their Programs designed to defeat copy-protection 
customers? What about consumers who back up program schemes, Any three of them will back up everything 


disks without a publisher's permission? What about now available for the ST. All copy-protection does 
people who not only make unauthorized backups, but fs enrage consumers, who find they can't transfer 
then proceed to share them? One publisher's Programs to double-sided or hard disks. And that 
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invites retaliation--"do ‘em as they do you"--In 
the form of extremely wide Illicit distribution. 

The sharing of programs without a publisher's 
permission Is tllegal, no question, But the 
question Is, should it be? Clearly, most consumers 
do "share" to a moderate degree, They tend to look 
at the practice the way wine -drinking must have 
been looked at during Prohibition--as a private 
right that no law may Inhibit, and where the 
judgment of what may be ethtcal must always be made 
by the Individual. (Political science scholars like 
to point out that laws never Impede activities that 
soctety considers permissible. ) 

No, | am not saying that the trresponstble 
distribution of programs is proper, and | certainly 
don't believe anyone has the mora! right to sell 
someone else's copyrighted work. What | do object 
to Is the suggestion by industry spokesmen that 
every undocumented copy of a program represents a 
fost sale to a publisher. That Is like proposing 
that everyone who ever got a pass to Disneyland 
would have bought a ticket otherwise, 

Suppose two consumers cannot Individually afford 
an expensive program they both admire. So they 
combine forces, each paying half, and one keeps the 
original disk while the other accepts a copy. 
Again, that undocumented copy Is Illegal but again, 
should it be? Who get hurt? Nobody. Who benefits? 
Everybody. ADAPSO will tell you that the Illicit 
copy has robbed a publisher of a sale, but clearly 
that illicit copy Is what made it possible for the 
publisher to make the sale. To think otherwise is 
reasoning from greed--not logic, 


Contributtons to ST Applications are welcome from 
everyone, We want a varfety of programs which can 
be helpful, useful or just fun for other Atart 
520/1040ST owners, 

We prefer articles with accompanying programs 
(and, hopefully, at least one picture or graphic) 
which demonstrates a type of Programming style or 
application, We wish to keep the content of 
articles serious enough to enable the readers to 
refer back to them in the future- something to 
build on. This makes for a more meaningful 
relationship with the user & his/her computer. 
Chances are tf a topic interests you, other people 
will find it useful as well. Our need for short 
articles is never ending. 

Should your submission Include a Program, please 
send in on disk ff it fs over 10 lines long. We 
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Submitting Material 


How can publishers persuade the buying public to 
cooperate, to Iimit undocumented copying? 
Primarily, | think, they must stop treating 
consumers Ifke adversaries, This means the 
termination of preachy and surly attacks on 
consmumers by industry spokesmen. I+ means an 
industry-wide abandonment of copy-protection, !+ 
means a policy of fair and just shrink-wrap 
agreements: reasonable guarantees Instead of 
disclaimers. Overal!, it means setting a standard 
for the type of behavior that publishers hope to 
elicit from thelr customers. 

Perhaps my own attitude toward FinalWord by Mark 
of the Unicorn Is Illustrative. FinatWord is my 
working too! as a writer. | use ft dafly; | am 
using ft now, And no, | have never given away a 
copy of It, though | can defeat its copy-protection 
easily. | don't give copies away because | don't 
think that would be right; | think the program is 
fatrly proced and honestly advertised. | even fee! 
beholden to the publisher for the prompt and 
professional telephone support its staff always 
Provides, But notice--this is my decision. Somebody 
earned my loyalty. Nobody intimidated me through 
preachy literature, ramrodded taws, nor packaged 
threats, and | don't think anyone ever will. 

Stmply put: {# publishers wit! respect the 
attitudes of consumers, consumers are likely to 
respect the attitudes of publishers. Nothing e!se 
will work: Publishers must eventual ly do unto 
consumers as they would have consumers do unto 
them. 


just don't have time to type In and debug any 
Programs longer than that. You are Invited to 
Include the text of your accompanying article on 
the disk as well as any screen art you may have, 
However, please send a hardcopy of the article, 
pictures and program I{sting. Please Indicate which 
word processor you used, 

Do us the courtesy of not submitting programs or 
articles currently submitted to another 
publicatton. 

We do pay for submitted articles. However, we 
wil! normally offer subscriptions (or extensions) 
for your work, Those wishing remuneration should 
state that when making submisstons. 

Our Address: ST Applications, P.O. Box 980, 
Forestville, CA 95436 
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A Sampler of German Software 


KRABAT 8.0a fiir ATARI ST 


Spielstarke! 1 iw & es Be i 5 | Zugriicknahne 
aa By Me = _( ; 
| Dein zug: t ¢ * sa £ Farbwechsel 


© 00:68:60 S : 
Co Lo Spielstarke + 
_| Mein Zug: ee 


Willkommen bei KRABAT-Schach _ mad 
Spielstarke - 
U1f-E. Schmidt : 


: 2 Alter Kirchweg 37 
Suchfenster: D-2828 Bremen 77 


heueronmtavre: ABBRUCH] 
: ; 


BEWERTUNG: 


| 0 00:00:00 oo 


a 2S 
Editor 


Heue Partie 


RECHENTIEFE! 


by Maurice Kowalski & Bill Petry 


These three magazines are quite Interesting for 
Atart ST information and software in West Germany. 


last spring | chanced to meet Maurice Kowalski, 
a visiting student trom Berlin, at the West Coast 
Computer Faire in San Francisco, CA. This month 
Maurice shares with us his views on a German public 


Atart ST Computer (strictly Atari ST) 


domain chess game and the 'Pear|! multi-tasking 
operating system developed for the ore 

We also give a few screens of other German PD 
and commercial programs. 

Should you be Interested in other sources of 
German and German-language software for the ST we 
give the following contacts which we have found of 
va lue, 


Atarl "Germany" Corp. 
Frankfurterstrasse 89-91 
6096 Raunheim 

West Germany 
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(93DM for foreign Airmail!) 
Heim-Ver lag 

Hetdelberger Landstrasse 194 
6100 Darmstadt-Eberstadt 
West Germany 


level 16 (for 16 bit computers incl. Amiga, MAC & 
ST) 

(330M for 6 Issues) 

Otto~Hahn-Strasse 26 

4000 Dusseldorf 

West Germany 
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c't (covers many computers, but does have Atarl ST 
specific articles and projects) 

(104DM for 12 issues) 

Verlag Heinz Heise GmbH 

Bissendorfer Strasse 8 

Postfach 61 04 07 

3000 Hannover 61 

West Germany 


rn 


KRABAT/CHESS 
Reviewed by Maurice Kowalski 


The history of chess began centuries ago and with 
it, the first chess problems. In modern times the 
problem was: is it possible that a machine 
(computer) can play chess? Later fn MIT labs the 
first simulation of a chess program was written. 
Two professors were asked to play against a new 
chess program, The programmers were told they were 
playing a computer, when in fact they were playing 
each other. One professor was [In one bullding with 
a terminal and the other in another building with 
another terminal, Nefther professor knew the other 
before starting to play. Actually, they recogn Ized 
the fake 'program' because they noticed the moves 
came randomly without special time limits. 

later 
as a 


on real programs were designed using chess 
topic, and the chess software started 
improving tn speed, skill, graphics, etc. up to 
today. 

What I'm presenting today Is one of the better 
chess programs for the ST- KRABAT-A German chess 
program, 

After | went toa friend with an Atari ST and a 
monochrome monitor (necessary-high resolution) and 
started the program, a very well organized menu and 
a@ chessboard appeared In front of my eyes. After a 
couple of mouse 'clicks' my game started. The 

strong and skftliful, but {t 
the problem of self sacrifice 
totally. That is stil! a deficiency where you can 
catch a chess program. However, | think it will 
satisfy beginners up to Intermmedtate players. 

The second part of the program is a chess editor 
(the best mouse driven I! have ever seen). You 
'click' one ffeld and then you 'clfck' until you 
have the right figure at the field. One thing that 
bothers me is that you can't enter moves by 
notation. 

Another part of the program ts that you can 
change the look of the figures by an tcon-editor. 
The program has all the features that a chess 
Program has to have (clock, move back, sktll 
change, color change, etc.) 


program fs quite 
doesn't solve 
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Is Incredible for the price. It is 
about $12-$13 you get the 
latest version when ordering from the author. 

Above all, it Is completely mouse driven and the 
Program has al! of the important features excluding 
Player vs. player and en passant moves (you have to 
do en passant by the editor). | would say this 
Program {ts a 'must! in any software library. The 
only thing that you need ts a 
dictionary. 

For information write to: 
E. SCHMIDT 
Alter Kirchweg 37 
2820 Bremen 77 
West-Germany 


The program 
public domain and for 


German-English 


Se SST EE 


RTOS-UH/PEARL 
by Maurice Kowalski 


In this article, | will try to Introduce to you 
the operation system of the ROTS-UH/PEARL, Let me 
provide you witha little Information In advance. 
RTOSstands for Real Time Operation System. This 
system was programmed at the University of Hannover 
in West Germany (UH). It was also transferred to 
the Atari ST compputer {n Hannover. Let me explain 
a few things about PEARL, This system actually Is a 
compiler which ts tmplememted for the M68000. 

The tdea of RTOS is that no CPU time gets wasted. 
The computer no longer has to watt for a slow 
Printer or for the user to press a button. Instead, 
it uses the CPU for something that normally does 
not exist in the standard operation system. The 
Dispatcher switches the CPU to the next important 
job. The normal operation system's job ts to start 
a problem and to end fit. But in RTOS, all the time 
ts controlled by RTOS over the computer and the 
Dispatcher can interrupt the program at any time 
(i.e@., the user presses a button or timer interrupt 
to start another program). The normal operation 
system loads one program into the memory and runs 
it, But RTOS ts able to do more, RTOS makes it 
posstble to load as many programs In the memory as 
desired while maintaining control over them. This, 
as opposed to TOS, allows the programs and data to 
remain [in the memory. So It fs necessary to clean 
the memory from time to time (since megabyte or 
half are limited). 

RTOS contains special! commands called "Task" to 
support the computer and bus devices, Although | am 
not completely sure, | believe that the system ts a 
bi-user system, | was only able to access some, but 
not all of the information. RTOS also has a couple 


Continued on page 11 --> 
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Puzzlepuzzle is Shareware by Tommysoftware, Mainzer Landstr. 147 
6000 Frankfurt / M. 1, West Germany. If you like it they request 


you send $10. If you’d like the Pascal source (in CCD’s Pascal 1.4), 
send an additional $10. 


#\ File Bearbeiten Block Attribute Hilfe 


A Arr Arr Ariiidrani 4.10] 
‘\[Eies ist Fettdruck in Gegensatz zu normaler Schrift, 
|... Dies ist fett_und unterstrichen, 

{Normale Schrift und dies ist *¥°erscrint Und subscript. 
korsive Schrs?? ig 5°" yng ig subscript (E7ALILE, 
Dies ist fett, kursiy und unterstrichen, 

Light (Hell) ist eer in #L0 ze sehes, 


Erinnern Sie sich noch an die chenischen Formeln fiir: 
Wasser! H20 Schwefelsdure: H2S04 


oder den Satz des Pythagoras in seiner Aussage fiir 
rechtwinklige Dreiecke: 


a? + b? = 2 


Weitaus weniger bekannt ist _Beispi folgendes 


This is a screen from ATARI-Software GST’s ATARI-Ist Word, Deutsch version. 
ATARIL...wir machen Spitzentechnologie preiswert. 
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THIS MONTH’S SPECIAL: TEAK DISK HOLDERS: 50 disk roll top case for $22.50 , 
disk case for $34.00. Anice accessory for your ST. Sony diskettes available, 10 for $16, 


double sided, 10 for $20. Supra 60 meg hard disk: $1700 VERY FAST DISK ACCESS! 


Barkatay, Ca. G4707 


100 


DBMAN $104.95 WINTER GAMES $27.00 
EZ-CALG $48.95 PHANTASIE $27.00 
A- CALC $41.95 DIABLO $21.00 
SBT ACCOUNTING (VARIOUS) UNIVERSE TWO $48.95 
VIP PROFESSIONAL $125.95 LEADERBOARD $27.00 
DAC - EASY ACCTING $42.00 ST STAR - RAIDERS $21.00 
ONE —- WRITE $69.95 JOUST $ 21.00 
REGENT BASE(GEM) $79.79 SUNDOG $27.00 
ST ACCOUNTS $166.56 SILENT SERVICE $27.00 
———____—__GAAPHIES —FPAHOGHAMMING & UTILITIES 
DEGAS ELITE $55.95 DISK DOCTOR $21.00 
EZ DRAW $104.95 FORTRAN 77 $104.95 
GRAPHIC ARTIST $142.95 PERSONAL PASCAL $52.45 
PAINTPRO $35.00 DISK LIBRARY $34.95 
PC DESIGN BOARD $276.50 


see 
Foxe 


B & W HIPPO DIGITIZER $111.95 
——___—__HAHOWARE 


1040 ST COLOR 
MONOCHROME 
§20 ST COLOR 
MONOCHROME 


SUPRA or ATARI 20MB 
BROTHER 1109 MATRIX $239.20 
ATAR! SMM804 MATRIX $183.20 
RICOH 2200, 22CPS LQ $387.95 
We are totally commited to the ST line of computers. 


it, call us. 


CALIFORNIA 


NATIONAL 


LOCAL 


MARK WILLIAMS ’G’ &ASSM. $125.95 
MEGAMAX 'C" 


—WORO PROCESSING &TOOLS _ 


$179.00 


$949.20 COLOR WRITER $48.95 
$799.20 HIPPO WORD $62.95 
$779.20 THUNDER(spelling checker) $27.95 
$639.20 FINAL WORD $104.95 
$639.20 peas TELECOMMUNICATIONS. 
1S TALK $34.95 
FLASH $27.95 
ANSI GRAPH (VT102) $55.97 


competent, sup 


This ad Is two months old, so if you don’t 


We will carry all software for the ST at 30 % off and related hardware for 20% off. 
consistently fast, 


Port and service call: 


(800) 874—4789 WE SHIP ANYWHERE! 


(800) 433 —6222 
(415) 849-8717 


Letters to ST 


Dear ST, 

| am the president of the local ST users group 
STAC-K (ST Atari Computers- Korea) and was 
wondering what, If any, discount you glve to user 
groups towards large quantity subscriptions. We 
feel that In order to use the programs in your 
magazine that each person should have a copy, So as 
not to Infringe on the copyright. Please Inform us 
so that we can place our order. Also please keep 
Producing the great magazine that you have 
started. 

Just some other notes to pass on to your 
readers, ST¥SIG disk magazine seems to have bitten 
the dust. | sent Clay Gradis a money order for 
Issues 4-8 and nothing. He cashed the money order 
but didn't produce the disks. Appears to be another 
flash In the pan ripoft of ST owners. The same 
appears to be true for ASTUN In Utah, a couple of 
Issues and then nothing, The new Compute! ST 
magazine 1s good but you can see that they are 
stl ll tled to the corporate strings of 
advertisers. 

Some of the software houses are sending out 
sample programs to the user groups which we here tn 
Korea are really happy about. It gives us a chance 
to check out the program before we shel! out the 
money. We hope that other houses will be doing this 
in the future, Some of the members have already 
ordered the complete Programs based on what they 
saw In the demos, 

-Robert Mann 
APO SF 96224-0373 


Robert, . 
We currently offer user group subscriptions for 
$30 each when pald for In batches of 5 or more at a 
time. This offer Includes one disk subscription per 
user group. Our policy on program use and 
possession Is that we reserve the right to sell 
these programs In ST Applications and our companion 
support disk. User groups have our permisston to 
offer the programs on our monthly disks to other 
members of the group free of charge thru their 
group BBS, 
-Bill Petry 
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Dear ST, 
For those keeping track of ST BASIC bugs, this 
Program illustrates another one, ST BASIC allows 


you to have strings of up to 255 characters. 
However, you evidently cannot get to parts ot a 
long string beyond character 127, When this program 
ts run, you will see that the MID$ function returns 
a string of 10 "A's, as does the RIGHT$. But the 
string AB$ contains all "B"'s from position 128. 
you change line 40 to ?MID$(AB$,127,10) you get one 
"A" and 9 "B"'s, With this In mind | would 
recommend avolding the use of strings longer than 
127 characters. 


l¢ 


10 A$=STRINGS$(127,"AN) 
20 B$=STRINGS(128,"Br) 
30 ABS$=A$+B$: 27ABS, 

40 ?MIDS( ABS, 128, 10) 
50 ?RIGHT$( ABS, 10) 


-Donald Krell 
Forestville, CA 


Errors & Boo Boos 


In Ron Schaefer's DISPLAY program the following 
line was left out from the listing on page 15 of 
the August fssue: 


4650 b = O:gotoxy 25,0:?"Touch NO to quit" 


The NO fs In Reverse (Inverse). 


In Leonard Kaplan's LOGO LOG In the September 
Issue (pages 51 & 52) the three referenced LOGO 
listings were not Included with the article. They 
are as follows: 
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TO PIGLATIN :XX 

MAKE "MAXDO COUNT :XX 
MAKE "COUNTER 1 

je ak ek dea ae HA IRR 


LABEL "AGAIN 

: KREKKEKKEEKEKREKERKERKKAKEK 

MAKE "CURRENT ITEM :COUNTER :XX 

IF (MEMBERP FIRST :CURRENT [A E I 0 U Y]) [MAKE "CURRENT LPUT "y :CURRENT | 
TYPE BUTFIRST :CURRENT 

TYPE FIRST :CURRENT 

TYPE "AY 

TYPE CHAR 13 

TYPE CHAR 10 

MAKE “COUNTER :COUNTER + 1 

IF (:COUNTER <= :MAXDO) [60 "AGAIN 
END 


Listing 1 


TO FACTORIAL :N 
IF :N = 1 [OUTPUT 1] [OUTPUT (PRODUCT :N FACTORIAL :N - 1)] 
END 


Listing 2 


TO PIG2 :XxX 
IF (COUNT :XX > 1) [PIG2 BUTLAST :XX] 

MAKE "CURRENT LAST :XX 

IF (MEMBERP FIRST :CURRENT [A E I 0 U YJ) [MAKE "CURRENT LPUT "Y :CURRENT] 
TYPE BUTFIRST :CURRENT 

TYPE FIRST :CURRENT 

TYPE "AY 

TYPE CHAR 13 

TYPE CHAR 10 

END 


Listing 3 


More German Software from page 7 


of other tasks, but 1! won't explain these here line. Consequently, no mouse or pull-down menus can 
because these explanations wil! take up too much be used (the commands are sometimes pretty long). 
space. But It is worth mentioning that RTOS has a Thus, | would recommend this system for programmers 
command for formating disks which is quite and not for users. Next, RTOS disks don't run on 
incredible. It ts possible to get 83 or more tracks TOS, but tt Is possible to change RTOS disks from 
that all depend no longer on the software, but on one computer to another. You have to think of RTOS 
the quality of the disk drive, RTOS also has an like CPM or MS-DOS. RTOS also needs a c't userboard 
editor which is not fancy, but is quite adequate to run. If someone Is interested enough In the c't 
tor writing source-files. userboard, | will be able to send the plans for the 

There are a few things that | didn't mention in userboard. Please note that the RTOS-UH/PEARL costs 
the article. RTOS works with keyboard and command around $80-$100. 
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Things just keep looking better and better for 
the ST, particularly in the field of music and 
MIDI, Talk in the industry has it that the ST 
stands the best chance of becoming the 'Commodore 
64! for MIDI musicians interested in 68000-based 
computers. Lest any Atari fanatics take this 
observation wrong, let me say it is meant as a 
compliment. Musicians, except for perhaps rock 
stars and the independently wealthy, are, just like 
everybody else, subject to the reality of having a 
limit to the amount of money they can spend on 
equipment, being required to keep some funds around 
for such trivial pursuits as food, shelter, etc. 
Keyboard players are especially affected by this 
because of the high price of keyboards, though this 
is changing somewhat as the latest technology 
Provides decent sounding boards at a fraction of 
the cost several years ago. Still, as the C64 was 
the least expensive option for getting a foot in 
MIDI's door with the widest array of software, many 
musicians chose it as their first computer. Now, 
the ST finds itself in a similar price position, 
and MIDI software companies, discovering that Atari 
is not going to dry up and blow away, are providing 
the support necessary to further solidify the ST's 
niche. This usually proves to be self-reinforcing. 
As more MIDI software is written for the ST, more 
musicians, and others, will buy one; as more people 
buy STs, the software houses are motivated to 
develop more programs, 

The result for me and you, right now at least, 
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is, not one, but two software reviews this month, 
Hybrid Arts has released EZ Tracks, a 
musician~oriented sequencer. (By the way, their 
CZ-Droid, a patch editor/librarian/creator is in 
the mail. Stay tuned for further details).... ST 
Music Box, from XLENT Software, is a composing too! 
designed to enable beginners to do from the ST what 
they may not yet be able to do directly with a 
musical instrument, XLENT has plans to use this as 
a base module for a line of MIDI programs... 

know | continue to promise some reviews of 
keyboards and other MIDI hardware, but as mentioned 
above, |, too, have to contro! my urges to buy 
every new keyboard that comes along, and even when 
| can gain access to these boards, | do not always 
have time to become familiar enough with them to 
give a clear, concise, and exact picture of them. 
So, anybody out there who may have bought a new 
synth (that is, a model that is a year or less old) 
who is willing to spend an hour or two writing (1 
really mean word-processing; use ST Writer or Ist 
Word please) about its strengths and weaknesses 
should do so and send the results to me, ¢/o ST 
Applications, Who knows; your work could grace 
these pages, with posterity ever-thankful (we would 
be, too, and we do pay for reviews). The main 
requirement is that your review remains 
coherent.... For those of you who do not consider 
yourselves budding Hemingways, but are still 
interested in seeing some equipment reviews, send 
your checks to the 'I'm So Broke | Can't Pay 
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Attention Fund'. | guarentee to spend all money 
recieved buying new keyboards. 
purposes, of course. 

Speaking of reviews, | must say I've gotten 
some flak recently concerning mine. The main 
complaint seems to be that | only discussed what a 
piece of software can do and somehow left out what 
it can't. Though this point of view is 
understandable, there are a couple of things I'd 
like to bring up. 


For review 


First, these reviews are meant 
mainly to provide more details than contained in 
product releases, They are not meant, 
cases, to encourage or discourage sales, but to 
give you enough information to decide where to 
start. If the review describes abilities that 
sound like the program might fit your needs, go to 
a dealer or an acquaintance who has the program in 
question and have it demonstrated to your 
satisfaction. If you have a specific need for 
certain extra capabilities, make sure that the 
program wil! do those things in conjunction with 
the equipment you currently own before buying it. 
Second, as most of the MIDI products so far 
reviewed are first versions, often released to gain 
a foothold in the market, before the product has 
been upgraded to its maximum powers, it is 
difficult to start listing the things | wish they 
would do; a list like this could run as long as the 
basic review. Where | felt a piece of software was 
extremely unworkable or missing important functions 
| have tried to mention it. Third, a piece of 
software cannot be all things to all people. | 
have been playing music for over twenty-five years 
and closely following MIDI since its public 
appearance four years ago (in fact, MIDI is the 
main original reason for my involvement with 
computers). Most of the ST MIDI software thus far 
hasn't begun to meet my wants and desires, but that 
doesn't mean that someone else with an ST may not 
find this same software totally sufficient for 
theirs. For example, while | never use Q-R-S's 
MIDI Magic to play computer Muzak, others may be 
ecstatic about being able to do so, 'Nuff said. 
Those programmers who are willing to pick up 
the gauntlet, so to speak, and write their own 
entries for the MID! market but still need a little 
help talking to the ST MIDI ports may want to check 
out Abacus's tenth volume in the ST Reference 
Library, Introduction to MIDI Programming for the 
Atari ST, by Len Dorfman and Dennis Young (from 
XLENT Software), to be released in the end of 
September. We haven't gotten a hold of a copy yet 
for review, but it is supposed to include source 
listings for a "...comprehensive MIDI editor, 
driver, and animated player. 


in most 


Coming next month will be a review of Dr.T's cz 


Patch, a product for which everyone with a Casio CZ 
Continued on page 17 --> 
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<< MODULA-2 


the successor to Pascal 


™ FULL interface to GEM DOS, AES 
and VDI 

= Smart linker for greatly reduced 
code size 

1 Full Screen Editor linked to compiler 
locates and identifies all errors 

= True native code implementation 
(Not UCSD p-Code or M-code}) 

‘= Sophisticated multi-pass compiler 
allows forward relerences and code 
optimization 

= Desktop automates 
Edit/ Complle/Link cycle 

© FileSystem, Real InOut. LonginOut, 
InOut, Strings, Storage. Terminal 


= Streams, MathLibO and all standard 
modules 

© Directory search paths 

= Supports real numbers and 
transcendental functions ie. sin, cos 
an, arctan, exp. In, log, power, sqrt 

= Sd graphics and multi-tasking 
demos 

| CODE statement tor assemoly code 

= 370-page manual 

§ Insialls on Hard disk and RAM disk 

= No royalties or copy protection 

@ Phone and network customer 
support provided 


Pascal and Modula-2 source code are nearly identical. Modula-2 should be thought 
‘of as an enhanced superset of Pascal. Professor Nikiaus Wirth (the creator of 
Pascal) designed Madula-? to replace Pascal 


Added features of Modula-2 not found in Pascal 


= CASE has an ELSE and may contain 
subranges 


= Programs may be broken up into 
Modules for separate compilation 


|= Dynamic strings that may be any 
size 
Multi-tasking is supported 
Procedure variables 


Module version control 

Programmer definable scope of 
objects 

= Open array parameters (VAR 
ARRAY OF REALS.) 

® Elegant type transfer functions 


= Machine level interface 
Bit-wise operators 
Direct port and Memory access 
Absolute addressing 
Interrupt structure 


Ramdisk Optomized 
Benchmarks (secs) __Compile i Size 
Sieve of Eratosthenes 62 2600 bytes 
Float 64 4844 bytes 
Calc 55 2878 oytes 
Null program 51 2370 bytes 


MODULE Sieve; 
CONST Size = 8190; FROM MathLib0 IMPORT sin, In, exp. 
TYPE —FlagRange = [0 Size}: sqrt, arctan: 
FlagSet = SET OF FlagRange; | VAR xy: REAL; i: CARDINAL: 
VAR Flags: FlagSet; BEGIN ["ST-SA-SS-") 
i,” FlagRange: x= 1.0; 
Prime, k, Count, Iter: CARDINAL; | FOR t= 1 TO 1000 DO 
BEGIN ("$S-$R-SA+*) Y= SiM (x): y-= IM Ox): Y= EXP OX): 
y= sart (x), y= arctan (x); 
x= x +007 
Flags:= FlagSet(): (" empty set *) ENO 
FOR i= 0 TO Size DO END float 
IF (i IN Flags) THEN 
Prime:= (1° 2) +3: '= 1+ Prime! 
WHILE k <= Size DO 
INCL (Flags, k}; VAR a.b.c; REAL; n, i: CARDINAL: 
k= k + Prime: BEGIN ("$T-.$A-SS-") 
END; m= $000; 
Count:= Count + 1 a= 2.71828; bi= 3.14189; 
END: FOR i= /TOn DO 
END; ¢:= G'a: := G*b; c:= C/a: c= 6/b) 
END: END; 
END Sieve END calc. 


MODULE Float, 


MODULE calc; 


Product History 

The TDI Modula-2 compiler has been running on the Pinnacle supermicro (Aug. 
'84), Amiga (Jan. '86) and will soon appear on the Macintosh and UNIX in the 4th 
tr. 86. 


Regular Version $79.95 Developer's Version $149.95 Commercial Version $299.95 
The regular version contains all the features listed above. The developer's version 
supplies an extra diskette containing a symbol file decoder ~ link and load fi 
disassemblers — a source file cross referencer — symbolic debugger — high 
Windows library Module ~ Ramdisk and Print Spooler source files — Reso. 
Compiler. The Commercial version contains all of the Atari module source files 


Other Modula-2 Products 
Kermit - Contains full source plus $15 connect time to Compuserve. 
Examples - Many Modula-2 example programs to show 
advanced programming techniques 
GRID ~ Sophisticated multi-key file aécess method with over 
30 procedures to access variable length records. 


Tol SOFTWARE, INC. 


10410 Markison Road ® Dallas, Texas 75238 = (214) 340-4942 
Telex: 888442 Compuserve Number: 75025.1331 
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EZ Track 


Type: Sequencer 

Level: Beginner/Intermediate 

Requirements: MIDI synth 

Features: 20 tracks, overdubbing 

List price: $65.00 

Publisher: Hybrid Arts, Inc. 
11920 W. Olympic Blvd. 
Los Angeles, CA 90064 
Office - (213) 826-3777 
BBS - (213) 826-42848 
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At last, a multi-track sequencer. One of the 
things that has intrigued me the most about MIDI 
from the beginning was the ability to record music 
(albeit in a symbolic, rather than analog, manner), 
in multi-track, The similarities to a professional 
tape recording studio are great, while the amount 
of extra contro! gained from digital manipulation 
of Information is powerful, indeed. €Z-Track gives 
a musician the chance to bring multi-tracking 
home. 

EZ-Track is a GEM-based program complete with 
pull-down menus and windows, controllable trom the 
ST keyboard, or the mouse in most cases. I+ runs 
in medium and high resolutions and, of course, 
requires at least one MIDI synth or drum machine; 
ff you are planning on doing any multi-track 
recording that makes use of more than one MIDI 
channel, you may need more instruments, With 20 
tracks available, you can lay down parts from your 
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by Richard Kaller 


synth, one track at a time, and syne them all 
together simply. Total note capacity is around 
27,000 notes on a 520 and 63,000 on a 1040, large 
enough for most purposes. | say ‘taround' because 
€Z-Track is capable of recording all MIDI data, 
including velocity, pitch and modulation wheels, 
and program changes. There is a MIDI Clock output 
for driving drum machines, A MIDI Thru function is 
provided with a channelizing option. One note: the 
Program won't run on the early 520s with TOS still 
loaded trom the disk; check with your local 
computer dealer about getting TOS in ROM. 

The €2Z-Track screen is divided into two parts, 
the Control! Display on the upper right and the 
Track Display on the left. These function somewhat 
like a tape recorder's controls and a mixing board, 
respectively. The Control Display is headed by the 
title of the song, the version number, date, and 
time (all updated every time you save a piece of 
music). Below this are the metronome setting 
(variable from 0.5 to 480 beats per minute and 
adjustable in fine and coarse increments), a check 
box for enabling and disabling the MIDI Thru 
function, and a channelizer. If the channelizer is 
set, all data passed on the Thru line has its 
command bytes reset to play only on that channel. 
The next line is occupied by the beat counter 
(which can be step advanced by quarter and 
sixteenth notes with the mouse), transposing icons, 
and metronome. Music may be transposed 4 octaves 
up or down, by octaves or by half-steps. An 
interesting feature is the ability to exempt 1 
track from the transposition. As always with MIDI 
recording, transposing a song and changing its 
tempo are independent functions, unlike tape. The 
metronome function. can be turned off (it uses the 
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monitor speaker), It Is tied very closely to the 
recording function, almost like a click track, so 
if a song has even one tempo change you will need 


an external metronome to provide the second tempo. 
The actual recorder controls are next, Starting at 
the left, they are Stop, Play, Pause, and Keep. 
The first three are fairly standard 'tape 
transport' controls. Everytime the program is in 
Play, any data on the MID! In line will be stored 
in a holding buffer. Clicking on Keep stores the 
data on a selected track, as the buffer is written 
over on the next pass. The bottom line is a bar 
graph indicating total memory used. 

The Track Display is basically a chart with the 
information for each track shown horizontally. At 
the extreme left is an arrow pointing to the 
current recording track. Each track is numbered 
and may be named. In the screen dump, these are 
not all tracks of one song, but different pleces of 
music condensed to a single track apiece. The 
first column after the track name contains an up or 
down arrow, depending on whether the track is 
tured on or off during playback. Other track 
information includes the end of data on a track 
(E), note activity, if a track has been changed 
(c), If It is protected (p), channel assignment, 
and Percentage of memory « Tracks may be 
individually turned on and off, protected from 
accidental erasure, or rechannelled from their 
original MIDI channe! to another, user selectably. 

The rest of the program's functions are 
accessed from the pull-down menus, Selection of 
one of these options results in GEM dialog boxes. 
The File menu gives the normal disk options of 
Load, Save As, Update, Delete (which deletes a file 
from the current disk), Format Disk, Current Drive 
(to make use of a second drive or hard drive for 
storage), and Quit. Track functions are Name, 
Protect, Unprotect, and Delete, all 
self-explanatory. From the Edit menu it is 
possible to Name Song, Copy Track, Mix Track, 
Time-Correct Track, and Erase Song (only effects 
memory ). Time-Correct allows correction of 
recorded timing data so timing errors are forced to 
the nearest note value selected; this in case the 
performance was a little sloppy. Notes can be 
quantitized to the nearest 32nd or 32nd triplet, or 
in grosser amounts if desired. For sending Mode or 
other similar MIDI commands to a synth, there is 
the MIDI menu. 'Mode' will pass commands to set 
channel selection, MIDI operating mode, and Local 
On/Off. ‘Out' is for enabling and disabling the 
MID! Clock data transmission. The last menu is 
Safety which allows you to toggle the. warning alert 
boxes and the automatic file backup routine. 

Overall, EZ-Track is easy to use, and has a 
fairly complete display of Its activities. Even 
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with its limitations, it is currently the strongest 
entry In the ST sequencer market. The 
documentation is clear, though anyone with 
experience with multi-track tape recording and the 
GEM interface won't need it very often. Having 
become hooked on using the mouse as a cursor 
controller for so much ST software, | am happy to 
see that almost every aspect of the program (except 
for alphanumeric input) can be driven by the mouse. 
| did have a minor problem in the beginning with 
the mouse rolling around during playback due to 
some rather strong bass vibrations; so much for 
mouse pads, 20 tracks is more than enough to do 
some complex. layering of sounds and crossing parts, 
As a musician, | find It absolutely necessary that 
most of the music be entered real-time from an 
instrument keyboard, so this Is a big plus. The 
only major complaint | have is the lack of editing 
capabilities. While it 1s possible to mix tracks, 
or delete them, this must be done to the entire 
track(s) Involved. !f during recording a mistake 
is made, there is no way to get rid of it other 
than ‘to trash the whole track. I+ would have been 
very helpful if the effected track could be run up 
to the point of the error, and the rest of it 
deleted, This would save much time for 
non-virtuosoes. However, the way around this is to 
record everything in short takes at slow tempos. 
If a mistake is made, and a track tossed out, then 
not much effort is lost. Mix the tracks that are 
just right, set the tempo to the plece's normal 
speed, and voila! 

Hybrid Arts has established a policy for those 
that find the above approach to editing too 
painstaking and time-consuming. Soon to be 
released are MIDITrack ST ($375) and MIDITrack 
Professional ($575). The first will include 60 
tracks, some real editing abilities like 
step-editing and auto-punch, and a hardware box 
providing sync-to-tape and external drum sync 
functions. The Pro version will have further edit 
options, plus the ability to read/write SMPTE time 
code and film click. One assumes that any files 
created with E2-Track will be usable with the upper 
level products. Registered owners wishing to 
upgrade their software may do so for $15 plus the 
difference in retail price. 
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ST Music Box 


Type: Note editor 
Level: Beginner 
Requirements: MIDI synth for externa! audio 
Features: step editing, music printout 
List price: 
Publisher: XLENT Software 
P.0. Box 5228 
Springfield, VA 22150 
(703) 644-8881 
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Picture, if you will, a modern day Bach or 
Beethoven. He no longer sits at the grand piano, 
one hand on the keys whilst the other messi ly 
scribbies notes with a quill; no, this brave, new 
composer's fingers dance across a@ computer 
keyboard, his face lit by the glow of the monitor 
as his melodies are channelled through his computer 
to a bank of MIDI synths. This would seem to be 
the vision XLENT Software had when they formulated 
the main concept for their program, ST Music Box 
Is a step music notation editor; that is, it lacks 
the ability to record real-time from MIDI but can 
send MIDI data entered with either the mouse or ST 
keyboard. For those currently without a MIDI synth 
it does provide access to the internal ST voices. 
This feature will be somewhat glossed over in this 
review and more of the MIDI aspects discussed. The 
disk comes with several compostions you can load 
and play, and a program to print sheet music, ST 
Music Box = runs In medium and high screen 
resolutions, though my disk was missing the 
monochrome version. As usual with XLENT, the 
program is not copy-protected. Also, as usual with 
data processing software, the data files generated 
with Music Box are not compatible with other 
authors! MIDI playback/sequencing/ed iting 
programs. 

The program has two main screens which can be 
overlayed with menu windows, called by the function 
keys. The function keys are also used to make 
further selections in these windows. (There won't 
be any screen dumps accompanying this review as 
XLENT has seen fit to disable the standard ALT/HELP 
dump, and there Is no way to exit the Program, 
other than rebooting the computer, so none of the 
SNAPSHOT utilities will work.) The editor screen 
has a grand staff occupying its upper half, with 
mouse contro|s in the lower left and mouse keyboard 
for Indicating notes In the lower right, There are 
eight. voices for which you can enter music, but 
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these are assigned in pairs to 4 seperate MIDI 
channels. A time signature can be picked (limited 
to 2/4, 3/4, 4/4, and 5/4) though it doesn't show 
on the staff; it only allows the editor to define 
measures, There is a full range of key 
signatures, 

Music Is entered in one voice, one note at a 
time. For each note a duration and an octave must 
be chosen. The notes appear on the staff but 
remain only until the measure is filled. There is 
a measure advance feature which automatically 
enters the notes in the memory buffer, but you 
can't enter more notes than allowed by the time 
signature even if the auto advance is toggled to 
off. You cannot call a window unless you are at 
the end of a measure, The number of symbols and 
beats already used in a measure, as Indicated by 
the 'U' and 'B' in the icon box, is not always 
accurate. | couldn't find a way to display 
multiple voices or multiple measures which makes it 
very difficult to see what you're writing in 
context of what you've already written. There are 
a couple of nice features I'd like to see in all 
music editing software, though. You can insert 
patch change data by hand into every measure. You 
will have to experiment a little to match the 
Instrument numbers in the program to the patch 
numbers on your synthe You can also change the 
tempo every measure, These are nice fine touches 
but don't overcome the IImitations of the overal! 
structure of the program. 
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The player screen is basically composed of 8 
'tracks' across which the notes play. You can 
finally see all 8 voices, notes or rests, at once, 
but they aren't in the context of a staff so the 
display of notes doesn't provide much more than 
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At the far 

measure count and 
number jis currently 
The top of the screen 
shows portamento control status (which is 
implemented in the program rather than effecting 
the portamento or glide function on your synth), 
channel status, and tempo. One strange thing about 
tempo values is that smaller 
values are larger values, 


knowing a note is in a specific voice. 
right of the screen are a 
indicators of what patch 
assigned to which channel. 


both screens) 
tempos, and 


(on 
faster 
slower; this Is backwards from most music notation 
where higher numbers indicate speedier tempos. 


The print program essentially does a dump of 


the top half of its screen, giving a slightly 
larger than normal notation. There is a text 
editor which gives you access to the ST font 
options, thickness, skewing, etc. You may add 
comments or lyrics in all shapes and sizes. You 


can also add the top half of any 32K picture file 
of appropropriate resolution, and save files Ina 
usable with XLENT's Rubber Stamp ST or 
ST, though | don't see much room on 

for extraneous graphic material. You 

notes by the screenful and print each 
dump entire pieces. One of the limits 
here seems to be that you can't print a whole line 
of multiple voices; 
per line, Even then 
some voices don't block out other voices; rests are 
overlayed on notes, and several stacked eighth 
notes may wind up looking like sixteenth or 
thirty-second notes. Single voices always print 
the whole grand statf even if they only make use of 
one of the staves. The print program might be more 
valuable as an option Integrated into the Music 
Box, rather than as a seperate program. 

XLENT's software to fall into that 
category where users either love it or hate it. ! 
think, in this case, their approach is interesting, 
but the software is hampered in places by a lack of 
understanding of what musicians want, Using the 
program is further slowed by its dragged-out screen 
redraw and Its insistence on emptying, and reacting 
to, the ST's keyboard buffer. Some things are 
merely annoying, like having to call the disk menu 
once to get a directory, then again to load a 
composition from the disk. Others | find downright 
unworkable as not being able to display more 
than one measure at a time, Certain ‘programmer's 
compromises! are questionable; for example, having 
a dotted quarter note play through MIDI asa 
quarter note and an eighth note, rather than as if 
the note was held, does not strike me as useful. 
Not being able to 
makes this at best a 
can be understood If 
XLENT's 


format 
Typesetter 
sheet music 
display 
screen or 


can 


they are printed one measure 
you must make certain that 


seems 


such 


enter music from an Instrument 
composing tool, which possibly 
viewed within the framework of 
graphic editors. |! think Music Box in the 
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long run, with some turther refinement to its 
abilities, could prove to be very helpful in 
producing simple scores and other types of sheet 
music, but this will require, of course, they 
provide the routines to convert files between the 
varying MIDI software companies! data storage 
formats. 


—————— 


More MIDI Notes from page 13 


has been waiting, and a complete(?) list of MIDI 
software and vaporware with their companies and 
addresses. Remember, it is up to you to let them 
know what it is you want. Until then, merry MIDI. 
late flash! After several months of trying to 
make long distance connections with the people at 
Key Clique but never succeeding, it was a pleasant 
surprise to get a demo copy of SYS/EX in the mall 
yesterday. This is a generic patch/sequence 
librarian that you can expand to cover all 
instruments or other devices that comply with the 
MIDI system exclusive protocol. Though it won't 


help you edit your patches, SYS/EX won't become 
obselete as you upgrade your equipments 
reviewed In December or January. 


To be 


BACKUP PROTECTED 


Requires an Atari 520 or 
SOFTWARE FAST. 1040 ST computer with one 
From the team who brought —or two drives. 


you COPY Ii PLUS (Apple), 
COPY II PC (IBM) and 
COPY 1] MAC (Macintosh) 


Call 503/244-5782, M—F, 
8—5 (West Coast time) 


comes arevolutionarynew —_ with your (ZBX) @P/in hand. 
copy program for the Atari Or send a check for $39.95 
520 and 1040 ST computers. _ U.S. plus $3 s/h, 
° Copies many protected $8 overseas. 
programs—automatically. 
(We update COPY II ST $39.95 


regularly to handle new 
protections; you as a 
registered owner may 


jate at any time for Central Point Software, Inc. 
a plus $3 ah A “ 9700 S.W. Capitol Hwy. #100 
Supports single and Portland, OR 97219 
double sided drives. e 
Includes both a fast Central Pomt 
sector-based copier and a Software 
ella one 


Backup utilities also available for the IBM, Apple il, Macintosh and Commodore 64. 
This product is provided fer the purpose of enabling you to make archival copies only 
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Pro-Fortran’s GEM Interface 


| don't know how many of you are using the 
Prospero FORTRAN comptler, but {tf you are, you have 
Probably noticed a rather large problem: the GEM 
Interface. Prospero provides a full GEM Ifbrary 
and documentation with their compiler, but the 
library ts full of bugs. If you have read my 
August column, you know that | have had to work 
around some of the limitations In It, No real 
major problems showed up: | could not rotate text, 
or put a "close window" icon on the plotting 
window, | could live with these limitations, but | 
found others recently that were unacceptable, and 
more were popping up every day. 

Prospero made some assumptions when they 
Packaged their GEM Ifbrary. They thought that they 
had provided every function and subroutine a user 
would need. Of course, this assumed that all the 
routines worked. 

My first idea was to fix the buggy routines, | 
looked rea! hard at the Prospero documentation, and 
found several common blocks for Passing arguments 
to GEM and one subroutine called "AESIF," and no 
clues about how to get to the GEM interface 
directly. It seemed like | could not fix the 
problems myself, but | did find a solution. 

As with most comptlers, the option of rewriting 
a Ifbrary is always available, but tn dotng thts | 
found some new problems. The most major was 
learning how to use Prospero's assembly language 
Interface, A second was looking at GEM from the 
assembly level. 

!f you plan to do anything like this yourself, 
| would suggest that you get hold of several items 
first. The first item is a compatible assembler. 
Prospero FORTRAN uses the GST linker, which uses a 
binary flle that is quite different from those used 
in the Atari developer's package. Luckily the GST 
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FORTRAN 


as a Second Language 


by Mark Lovell 


linker has become popular; it ts used by all of 
Metacomco's products (Lattice C being the most 
popular), and all of Prosperots products as well, 
Metacomco makes a macro assembler that Is perfect 
for this purpose, 

A second item that you might find useful is a 
68000 machine code reference manual. The 
documentation that comes with a macro assembler 
rarely covers the machine itself. Even If you feel 
comfortable with the 68000, a good reference for 
the machine would not hurt. | recommend 68000 
Assembly Language Programming," put out by 
Osborne/McGraw-Hi ll. It is not only a good 
reference, but a good tutorial as well. 

The last item that you will need ts a good GEM 
reference. At the moment, there are only two 
sources: the Atari developer's package, or 
Abacus's "GEM Programmer's Reference." | can't say 


that | highly recommend the Abacus book == it has 
too many misprints, and omits many routines == but 
at $19.95, It Is a lot cheaper than Atari's 
solution. | have used the Abacus book for this 
project. 


FORTRAN cannot directly call GEM. Thts ts 
because GEM requires that certain registers be 
loaded with Information and that a machine language 
"TRAP" instruction be executed. | have written two 
assembly language programs to remedy this problem 
Only two assembler routines were necessary because 
GEM has only two methods of being called, one for 
the VDI routines and one for the AES routines. | 
put a minimal amount of code In assembly language, 
so the final result would be as understandable as 
possible. The way | have set things up, a FORTRAN 
routine can load the necessary parameters Into 
arrays, and pass the arrays to the assembler 
routine to pass on to GEM, This way most of the 
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new GEM Ifbrary can be tn FORTRAN, which is quite a 
bit more understandable than assembler. MOVE.L (SP)+,A0 Pop return address off stack 


ADDA. W #8,SP Remove adr of arg from stack 
Interfacing FORTRAN to assembly language: JMP (AO) Goto return address 
When Prospero FORTRAN calls a subroutine, It Since there are two arguments In the above example, 
puts the addresses of the arguments on the stack. "ge" (2 times the size of an address) is added to 
So if we have a subroutine call like this: the stack to remove the arguments. The "8" would 
be replaced In other cases the number of arguments 
Call Add(A, B) times 4, to be correct. With this Information we 
can now write an assembly language routine to do 
the stack will look something IIke this: just about anything. 
4---------------- + Interfacing assembly language to GEM: 
Stack Pointer --> | Return address | Low Memory 
pee ie es 2 ee + “ Interfacing with GEM Is not as easy In 
! Bis address t 2 assembler as It is in a high level language. With 
+---------------- + % VDI routines there are five arrays used for 
! Ats address | High Memory communtcation: 
4---------------- + 
Name Use 
To access either argument from assembly language, ---- — 
you can use Its address. When the assembler Contro! Passes the # of the cmd, and cmd into 
routine returns, there is a little cleaning up to Inttn Numbers required for the command 
do. It ts the responsibility of the called routine Ptsin xX, Y potnts required for the command 
to remove the arguments from the stack before the Intout Number output by the command 
routine returns. Prospero recommends the following Ptsout X, Y points output by the command 
sequence: 
Common /Contr1l/ Contrl (0:11) 
Integer*2 contrl 
common /AGloba/ AGloba(0:14) 
Integer*2 AGloba 
Common /Intin/ Intin(0:127) 
Integer*2 Intin 
Common /Intout/ Intout (0:127) 
Integer*2 Intout 
Common /AddriIn/ AddrIn(0:63) 
Integer*4 AddriIn 
Common /Addrou/ Addrou(0:63) 
Integer*4 AddroOu 
Common /Ptsin/ Ptsin(0:127) 
Integer*2 Ptsin 
common /Ptsout/ Ptsout (0:127) 
Integer*2 Ptsout 


Listing for GEMCOMM.FOR 
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Each of these arrays Is required for every VDI 
command. Rather than defining them tn each 
routine, | have set up a common area for each of 
them, The common area definition Is shown in the 
file "GEMCOMM, FOR." 

When calling GEM from assembler, the address of 
@ parameter block must be passed in register D1 and 
the Iibrary number ($73) must be passed in DO, 
After the registers are set up, a "TRAP at 
Instructton must be executed, 

The format of the parameter block [s rather 
simple -- it consists of the addresses of the five 
Parameter arrays. If we pass the arrays as 
arguments to the assembler routine, thelr addresses 
will be available for passing along to GEM, Since 
FORTRAN pushes the address of the first argument on 
the stack first, the first argument wil! be the 
last in the parameter block, If we call the 
assembler routine like this: 


Call DoVdI(Ptsout, Intout, Ptstn, Intin, Control!) 


Then the addresses of the arguments will end up on 
the stack ITke this: 


teo---------- ~~. + 
Stack Pointer --> | Return Address | Low Memory 

ten------- 2-8. + 5 

| Control! Address | > 

+----------------- + = 

' 

H . 

eo-------------- + es 

H . 

are ‘ 

| Intout Address | 3 

+-. ° 
i High Memory 


te. 

which happens to be exactly the way GEM wants the 
Parameter block to be set up. The address of the 
Paramenter block is now the value of the stack 
pointer + 4, since addresses are 4 bytes long, My 
implementation of "DoVdi" is listed tn 
"DOVDI.ASM."" 

The AES Interface works similarty. 
stx parameters: 


It requtres 


Name Use 

Control Same as for VDI 

Global Stores GEM constants 

Intin Same as for VDI 

Intout Same as for VDI 

Addrin Addresses sent to AES 
Addrou Addresses recelved from AES 


The library number for the AES [s "$C8." The AES 
assembler routine is called this way: 
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XDEF DOVDI 

VDI EQU $73 
TEXT 

DOVDI MOVE.L SP,D1 
ADDO.L #4,D1 
MOVEO.L #VDI,DO 
TRAP #2 
MOVE.L (SP)+,A0 
ADD.L #20,SP 
JMP (AO) 
END 

Listing for DOVDI.ASM 

XDEF DOAES 

AES EQU $cs 
TEXT 

DOAES MOVE.L SP,D1 
ADDQ.L #4,D1 
MOVE.L #AES , DO 
TRAP #2 
MOVE.L (SP)+,A0 
ADD.L #24,SP 
JMP (AO) 
END 


Listing for DOAES.ASM 


Call DoAes( Addrou, Addrin, Intout, Intin, Global, 
Control) 


The routine "DoAes" is jisted in the flle 
"DOAES. FOR." 


Using the new Interface: 


Each array must be loaded with the correct 
values, for the GEM call to be mde, After the 
call ts made, any returned values must be moved 
from the arrays to the Proper varlables. The 
Information needed to make the varlous GEM calls ts 
Provided {n the Abacus GEM reference manual. The 
two assembler routines could be used directfy In a 
Program, but for the sake of readabl lity, | would 
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Subroutine Vopnvw(Workin, Handle, WorkOu) 


Include 


Integer*2 
Integer*4 
Integer*2 


Integer*4 


Contrl1 (0) 
Contr (21) 
Contrl (3) 
Contrl1 (5) 
Contrl (6) 


toe tt 


'C:Gemcomm'! 


Workin(0:10) 
Handle 
WorkOu (0:56) 


Call Dovdi(Ptsout, Intout, Ptsin, Workin, Contrl) 


Handle = Contr1(6) 


Do 10 IT = 0, 44 


Workou(I) = IntOut(I) 


Continue 


Do 20 I = 45, 56 


WorkOu(I) = ptsout(I-45) 


Continue 


End 


Listing for VOPNVW.FOR 


Subroutine VPline(Handle, Count, XY) 


Include 


Integer*4 
Integer*4 
Integer*2 


Contrl1 (0) 
Contr: (e) 
Contrl1 (3) 
Contrl (6) 


Hou wa 


Call Dovdi(Ptsout, 


End 


'C:GemComm' 


Intout, X¥, IntIn, Contrl) 


Listing for VPLINE.FOR 


not recommend it. | think the best way to use them 
is to recreate the GEM library provided with 
Prospero'ts FORTRAN, The format of their library Is 
simple and easy to follow. The routines for 
“VOPNVW'T and "VPLINE" are listed as examples. 

As a bonus for disk subscribers, | have 
included the source for a complete GEM Ifbrary with 
a calling scheme identical to the format documented 
In the Prospero manual. 


tate Breaking News: 
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| have received a letter from Prospero In 
England. They insist that their compt ler and Its 
Itbrartes have been thoroughly debugged. News from 
another British company Indicates that there are 
some diffences in the British ST's (both keyboard 
and monitor are different). This may be the source 
of the problems | have had. Prospero seemed quite 
interested in finding out about possible errors in 
thetr system; so, if you find any new ones, send 
them to me, and | will collect them and send them 
on to Prospero. 
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Diskette Control 


Overview 

This is the first part of a series of articles 
discussing diskette drives, diskette formats, 
software, and drive connections, The approximate 
contents of these articles, which will appear 
intermittantly, are as follows: 

1. "Density", and formats 

Programming of the 1772 

Drive connections and signals 
Connecting a 5.25" drive to the ST 
Writing your own 1/0 drivers 

When this series 1s done you should be able to 
read and write to micro-(3.5") and mini-(5.25") 
diskette drives using any sector size you need. | 
don't use copy-protected diskettes, so | can't 
discuss them. 

Density 

"Density" is a term from Physics whlch means 
"mass per unit volume"; Density is measured in 
grams-per-cublc-centimeter, One CC of tron weighs 
more than one CC of water because It is more dense 
than water, "Bit Packing density" refers to how 
much information can be recorded on (or in) some 
recording medium. This Is bi ts-per-square-centl - 
meter for a magnetic-surface device such as tape, 
disk, or diskette, Because recording !s done in a 
linear fashton (you can't record an area), the 
"recording density" is measured as bits-per-cm 
along the tracks and as tracks-per-centimeter going 
across the tracks (see Fig!), This reduces the 
overall density because of the space "wasted" for 
guardbands between the tracks. 

Everyone has heard of "single density" and 
"double density" by Now, but "What is it?" you ask, 
and "What about 'quad density'?", This is a long 
storyee. 
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‘Applications 
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> 

A diskette drive, like an audio tape recorder, 
has a "frequency respone! range, This means that 
the reproduced signal has, over this frequency 
range, a relatively constant amplitude. The span 
from 20Hz to 20kHz Is approximately ten octaves, a 
range which Is extremely difficult to achieve. The 
signal processing needed to obtain this trequency 
range and the magneting recording process itself 
both cause excessive amounts of distortion to the 
recorded signal. The flat "frequency response" 
graphs shown on a machine's data sheet shows what 
has been bought by creating this distortion--this 
graph cannot show the distortion of the waveshape 
of the signal. 

Digital signals, such as are found in disk and 
diskette drives, MUST have thelr waveshapes 
accurately reproduced. In addition, each bit must 
be distinct from its neighbors and it must occur at 
the right time; this 1s common info to computer 
people, What most people don't know is that the 
distortion referred to above distorts all three of 
these necessary factors. To minimize the 
distortions -that Is, to minimize BER(Bit Error 
Rate)- three steps are taken: 

1. NO signal processing. 

2. channel coding to minimize bandwidth, 

3a. BCC(Block Check Code) to detect errors. (or 
sometimes) 

3b. ECC(Error Correction Coding) note: These 
codings are not cryptography. 

The third item requires its own article, and the 
first requires no discussion. Bandwidth egding is 
what most affects recording density. There are many 
coding schemes for magnetic recording, but only 
three will be discussed: NRZ (Non Return to Zero), 
Manchester, and Miller. 
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Figure 1. Recording Density is measured as bits-per square-centimeter 
along the tracks and tracks-per-centimeter going across the tracks. 


"In 'NRZ(level)!', zeroes and ones are recorded as 
positive and negative levels so that transitions 
only occur whenever the data bits change. ... For 
long strings of zeroes [and ones] ... the maximum 
OC content Is unity".(1) When the recorded signal 
is DC, the playback head produces nothing because 
it Is sensitive only to a CHANGE in recorded 
signal. When these "dead spots" occur, the 
Playback circuits lose thelr clock-synchroni zation 
and data are lost, NRZ 1S usable for low data-rate 
applications; it is used because it requires only 
very simple circultry. 

"Manchester coding and its variants are known by 
many names: bi-phase, double-frequency, 
phase-encoding, frequency-shl ft-coding and, quite 
Inaccurately, frequency modulation."(1) Manchester 
is used for "single density" diskette data 
recording. It has zero DC content, and Is 
self-clocking. Its drawback is that it requires two 
bit-periods to record each data bit, It 1S easy to 
use and easy to understand. (see fig2.) 

"MI | ler code is known by two other names: 
delay-modulation and (even more confusingly) 
modi fied-frequency-modulation (MFM)"(1) The Miller 
coding method is used for "double density" diskette 
recording. Its advantage relative to Manchester is 
that it records a data bit for every bit period. 
This Is why It is mis-called "double density". Its 
disadvantages are its complexity and its DC content 
of approximately thirty-three percent, Its lower 
signal-to-noise ratio and its complexity make It 
difficult to use, but the payoff is increased data 
storage. 

It should be obvious that "quad-density" doesn't 
exist, If it did, It would be capable of recording 
TWO data bits during EACH bit period. There ARE 
(for radio) methods of transmitting two or four 
bits per bit perlod, but they are analog methods 
and won't work for disk/diskette/magtape data 
recording. 

Digital data recorders use saturation recording. 
This means that the magnetic force recorded on the 


medium is as strong as it can be. Amplitude 
variations are eliminated during the playback 
Process to improve data rellability; this Is why 
the analog data compression methods don't work for 
digital recording systems, 

The last pattern shown In Fig2 shows how the 
Miller code stores twice as much data as the 
Manchester code [In a given amount of space. When 
the smallest bit-cell perlod of the Miller code is 
made equal to the smallest bit-cell period of the 
Manchester code, it can be seen that the Miller 
encoded data require half as much space as the 
Manchester encoded data. If the same space js used, 
the Miller code will store twice as much data as 
the Manchester code. The Miller-squared code, 
which 1 didn't discuss, also records one data bit 
In each bit period, The Miller-squared code 
eliminates the DC content of the basic Miller code 
at the expense of more-complex circuitry. 

The limit on what can be recorded is due to 
(a)the record process, (b)the recording medium, and 
(c)the playback process.(2) Fig2 shows there Is a 
vast difference between the ideal and the actual 
Playback respones. The playback is affected by ALL 
the recording distortions even though the playback 
process Itself Is only a partial contributor to the 
total distortion. 

As can be seen, if the data bits are too close 
together they will tend to merge and form patterns 
similar to the troublesome NRZ patterns. Some 
errors in the magnetic recording process actually 
cause some of the data bits to move to positions 
earller or tater than where they should be. This 
timing distortion can cause bits to merge: if one 
bit [Is late and the next early, they can be 
mis-detected by the playback circuitry, and... (Ta 
dace.) errors result, This effect can be 
compensated for somewhat by a write precompensation 
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system in the recording cIrcultry and by 
pulse-narrowtng circuits In the playback 
ampli flers(3). 
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Recording signals and NRZ ecording format. 
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Figure 2. Manchester Coding is used for single density recording. 
Miller Coding (modified frequency modulation) is used for double density. 


Formats 02 XX CRC bytes (Cyclic Redundancy Check) 
Every once-in-a-whi le someone asks me "is the |BM 22 4E {DAM tral ler 
[diskette] format 128B or ts it 256B?". The answer 12 00 DAM clock-synch 
is "Yes.", of course, because the 1BM diskette data 03 Al Addr Mark lock-in marker 
format specification allows the use of 128, 256, 01 FB Data Address Mark 
512, or 1024 bytes per sector. Some of the overhead xx The DATA 
information recorded for each diskette sector 02 XX CRC bytes 
reveals the sector's fength. At this time | will 40 4E Data sector trailertt 
describe the diskette formats from the diskette's 1401 4E Track trailer 
point of view and sometime In the future | will The data Inside the braces ts repeated for each 
discuss how to create your own diskette formats. sector. The data before and after occur only once 
per track. This will be explained in detail when 
ST diskette format data for one track... track formatting ts discussed. Items marked "xx" 
#B Val Description are user-supplied while the items marked "XX" are 
supplied by the 1772. The two CRC bytes are a 
Index pulse tral ler sixteen bit code used to detect errors in the data 
'DAM clock-synch on playback. It cannot correct any-errors and can't 
Addr Mark lock-In marker even detect all errors. 
(1D Address Mark References 
(00:4F) Track (1) "Optimal codes for digital magnetic recording" 
(00:01) Side by J. C. Mallinson and Je W. Miller; The Radio 
(01:09) Sector and Electronic Engineer, Vol 47 No. 4, pp. 172:176, 


Sector size (512B) Aprt{ 1977. The Miller whe co-authored this paper 
Continued on page 34 --> 
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Example of VST _Alignment 


The Lesser of Two Evils- VDI Part 2 


After much deliberation, | have decided to 
postpone a discussion of the AES until! another month. 
The less desirable features of VDI, such as inputs, 
inquiries, and text, are probably the lesser of two 
evils, as they are easier to understand and use. 
Admittedly, although the mouse inputs used by VDI are 
primitive, and the inquiry functions are quite dry, 
text on the ST is a rich, interesting topic. But 
alas, | am getting a bit ahead of myself. The two 
general types of functions described in last month's 
column were output functions, which make things 
happen on the screen, and attribute functions, which 
set the parameters for the output functions. Text, of 
course, is an output function. The two important ST 
input functions are those used for getting the 
position of the mouse and inputting strings. String 
input does not work that well, but obtaining mouse 
coordinates is quite elegant. Inquiries are basically 
the opposite of parameters, By using inquiry calls, 
the programmer can determine the state of various VDI 
attributes, thus the name Inquiry. With knowledge of 
these three techniques, VDI Programming becomes even 
more enjoyable. 

This column will provide examples for 4x FORTH, 
Forthmacs, and Multi-FORTH. VDI works strangely under 
GEM, and in Mach 2, it Is imposstble to type in input 
examples from within the Forth. String handling in 
Mach 2 is also much more Primitive; an explanation of 
creating packed strings would be In order, and that 
is an entirely different subject. This difficulty 
with strings makes text output just slightly 
difficult, However, the inquiry features mentioned 
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can be used with Mach 2; to use them type 'call' and 
then the name of the 4xFORTH Forthmacs name minus the 
'_' (underline). For those who did not read the 
September '86 A Step Forth, this column is simply not 
golng to make sense. Read it first -- after all, this 
is VDI Part 2 and none of the examples will work 
unless you type in the initialization procedures 
described in that article, 


Text in all its Glory 


There are two kinds of text supported by VDI: 
graphics text and justified graphics text. Justified 
graphics text output is by far the more 
typeset-looking, whereas plain graphics text is dully 
monospaced. However, both text types use the same 
attributes and Inquiries. The graphics text call Is 
v_gtext (VTextDraw), and the justified text call is 
v_justified. (Multi-FORTH equivalents to the 
Forthmacs/4x FORTH/DRI standard are in parentheses. ) 
The parameters for graphics text are the x and y 
starting coordinates and the string to be printed. In 
addition to the parameters graphics text needs, 
justified graphics text requires the intended length 
In pixels of the text, and specifications as to 
whether GEM may modify character and or word spacing, 
Both commands, of course, require a handle when used 
from within Forthmacs; see last month's column for an 
explanation of VDI handles, 

The text attributes are VST_HE! GHT (VTextHeight) , 
VST_POINT (VTextSize), VST_ROTAT ION (VTextDirection), 
YST_FONT (VTextFont) , VST_COLOR (VTextColor), 
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VST_EFFECTS (VTextStyle), and VST_ALIGNMENT 
(VTextAlign). VST HEIGHT sets the height In pixels 
for all future text called from elther the graphics 
or justified text commands. Also required in the 
VST_HEIGHT call (only for Forthmacs) are the address 
of the variables charwidth, charheight, cellwidth, 
and cellheight, These variables simply have to be 
created by the programmer (ise. type: variable 
charwidth variable charheight, etc.) and when the 
routine Is called, the values of the character width, 
etc. end up in the variables. Character width and 
height are the dimensions of the printed characters 
in pixels; and the cell dimensions are for the space 
that the character, Including surrounding space, 
takes up. By returning the values actually set, VDI 
tells the programmer to what degree his or her 
instructions have been carried out. In Multi-FORTH 
and 4xFORTH, this feature Is not accessible; the only 
parameter that needs to be passed is the text size. 
The attribute VST POINT takes a point size instead of 
a pixel height, with a point being approximately 
1/72", This doesn't mean anything, of course, because 
an 8 point selection on a monochrome monitor is much 
smaller than a similar 8 point selection in low res 
on a color monitor. The same variables used with 
VST_HEIGHT are used with VST_POINT. VST_ROTATION 
offers the magical ability to turn the text at any 
degree from 0 to 360. Unfortunately, doing this is 
still magical, because text will only tilt at four 
angles: 0, 90, 180, and 270 deg. The angles are 
specified like those for arcs and elliptical arcs. 
Thus, to rotate text 90 degrees, 900 would have to be 
the parameter (along with the handle in Forthmacs) 
passed to VST_ROTATION, VST_FONT, unfortunately, does 
even less than VST_ROTATION, which is to say, 
absolutely nothing. There is only one font avai lable 
on the ST, so VST_FONT is of no use. VST_COLOR 
selects the color Index for the text to be printed 
in. The color index selection is just like that for 
lInes and markers and fills. You can choose from 
black and white in monochrome, one of four colors in 
medium res, and one of sixteen colors in low res. 
VST_EFFECTS has 63 possible combinations, and is 
controlled by sending an effect number as a parameter 
+o VST EFFECTS. Setting bits 0-5 will result in 
changing thickness, Intensity, skewing, underlining, 
outlining, and shadowing respectively. Thus, if the 
effect number is 63, the text printed will be 
thickned, intensified, skewed, underlined, outlined, 
and shadowed (1+2+4+8+16+32). Some people might even 
call it illegible... Finally, there Is the attribute 
VST_ALIGNMENT, whose first parameter determines 

just! fication/horizontal alignment (0 = left, 1 = 
center, 2 = right), and whose second paramter 
determines vertical alignment (O=baseline, t=half 
line, 2 = ascent line, 3 = bottom, 4 = descent, 5 = 
top). Basically, the vertical adjustment, in order of 
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increasing height, is bottom line, descent line, base 
line, half line, ascent line, and top line. If all 
these parameters and commands seem confusing, the 
following tables and examples should clear things 

Upe 


Table 1: TEXT OUTPUT 


Op. Code | Name | Syntax 
8 | V_GTEXT (VTextDraw) | ( x y string -- ) 


11, Id=10! V JUSTIFIED (N/A) | ( x y string 


i {length word- 
i | space char- 
Hi | Space -- ) 


x and y: coordinates of the lower left hand part of 
the text to be printed. 

string: address, then length of a packed string Is 
placed on the stack. (address only for 4xFORTH) 
wordspace: interword spacing. O=off. Non zero=on. 
When word spacing !s "on,'' GEM can (and usually 
will!) alter spacing between words. 

charspace: intercharacter spacing. O=off. Non 
zero=on. When character spacing is "on," GEM can (and 


usually will!) alter spacing between Individual 
characters. 
Remember: always use a handle (just the number '1I') 


as the first parameter in a Forthmacs VDI calle 


Table 2: TEXT ATTRIBUTES 
Op. Code | Name Syntax 
12 | VST_HEIGHT | ( height charwidth 
| (VTextHe ight) | charheight cell- 
1 | width cellheight 
H Heer.) 
107 {| VST_POINT © point charwidth 
| (VTextSize) | charheight cell- 
H | width cellheight 
1 1 
--) 
13 1 VST_ROTATION | ( angle -- ) 
| (VTextDi rection 
21 | VST FONT (VTextFont){ ( font -- ) 
22 | VST_COLOR '( index -- ) 
L_(VTextColor) i : 
106 | VST_EFFECTS | ( effect -- ) 
| (VTextStyle) fi 
39 | VST_AL|GNMENT ' ( horin vertin 
1 1 
1 1 


(VTextAl ign) horout yertout --) 


height: helght in pixels of future text. 
charwidth; a user intialized variable that returns 
the character width selected by GEM. Not used by 
Mult1-FORTH or 4xFORTH. 

chareheight: a variable that returns the character 
height selected by GEM, Not used by Multi-FORTH or 
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4xFORTH. 
ceilwidth: a user initialized variable that returns 
the cell width selected by GEM, Not used by 
Multi-FORTH or 4xFORTH. 

cellheight: a user initialized variable that returns 
the cell height selected by GEM. Not used by 
Mul+i-FORTH or 4xFORTH. 

angie: angel of rotation -- 0=0, 900=90, 1800=180 
deg, etc. Only acceptable vaiues are 0, 900, 1800, 
and 2700. 

font: # of font to be selected. Does not work because 
there is only one font! 

index: color Index to be selected. 6 would select the 
sixth color from sixteen choices in low res. O=white 
and 1=black in monochrome, 

effect: text effect. Setting a bit to 1 selects 


effect. 
Bit 0 = Thickening 
Bit 1 = Intensity 
Bit 2 = Skewing 
Bit 3 = Under|ining 
Bit 4 = Outlining 
Bit 5 = Shadowing 


horin: horizontal alignment/ justification desired to 
be selected. 
left justified (defauIt) 
center justified 
right jusititied 
vertin: vertical alignment desired to be selected, 

5 = top line TOP 
ascent tine y 
half line TaN 
base line (default) ; 
descent line t 
bottom line BOTTOM 
a user initlaiized variable that returns 
horizontal allgnment/ justification value selected by 
GEM, Not used by MultI-FORTH or 4xFORTH. 
vertout: a user initialized variable that returns the 
vertical alignment value selected by GEM, Not used by 
Mu Iti-FORTH or 4xFORTH, 
Remember: Multiforth words are in parentheses. 
Notes: VST_HEIGHT may appear as vsr_ height in 
Forthmacs. Change It to vst_helght. Also, vst_effects 
in Forthmacs may cal! the Incorrect opcode. !f so, 
change the code "21 set-one" to "106 set-one! In 
ForthEmacs. 


1 
ie) 
4 
3 


horout: 


EXAMPLE 1 (Forthmacs) 


Type: 
string-array stapps ," ST Applications" 
end-string-array 
variable charwidth 
varlable charheight 
variable cellwidth 
variable cellheight 


Forth, Also, 


1 40 charwidth charheight cellwidth cel lheight 
vst_height 
charwidth ? charheight ? cellwidth ? cellheight ? 
14 vst effects 
1 1 vst_color 
erase-screen 
1 320 200 xy.scale 0 stapps v_gtext 
erase-screen 
2 expandit! 
240 0 do 
1 320 § 2/ - 200 xy.scale 0 stapps i 0 1 
v_justified 
3 +loop 
1 2 vst_color 
erase~screen expandit! 
-->Hints: If Forthmacs does not know what xy.scale 
is, the code for xyescale Is In the September A Step 
if Forthmacs does not know what 
vst_height is, try using vsr_height instead. 


EXAMPLE 2 (4x FORTH) 


Type: 

TOS$ STAPPS ST APPLICATIONS" 
40 VST_HEIGHT 

4. YST_EFFECTS 


1 yST_COLOR 
CLEAR 
320 200 XYeSCALE STAPPS V_GTEXT 
CLEAR a 
+ EXPANDIT! 
240 0 DO 
320 | 2/ ~ 200 XY.SCALE STAPPS | 0 1 


j_ JUSTIFIED 
3 +LOOP 


: You will not be able to read the text; 4x 
FORTH does not blank out each line after writing it 
EXAMPLE 3 (Multi-FORTH) 


Type: 
CREATE STAPPS ," ST Applications" 
40 VTextHei ght 


4 ViextSty le 

1 VTextCofor 

ClearScreen 

320 200 XY.SCALE COUNT STAPPS VTextDraw 

-->Hints: The justified "special effects" text cannot 
be done on Multi-FORTH, Also, type in the code for 
Forthmacts XY.SCALE from the September A Step Forth, 


What you see in examples one through three are the 
italicized words "ST Applications." The variables in 
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the Forthmacs are displayed so that you get an idea 

of how close GEM will come to doing what is expected. 
Part of the code does not work in Mul ORTH because 
MultI-FORTH does not support justified graphics text. 


This part of the demo performs a word expansion in 
the middle of the screen with the text "ST 
Applications." The compromise between 
AxFORTH/Mu It i-FORTH code and Forthmacs YD! convention 
should be clear. Although Multi-FORTH and 4xFORTH are 
easier to use and require less code, the user also 
has less contro! over what happens and thus obtains a 
Poorer understanding of VDI. 
Two Interesting VDI Input Functions 

VDI Input functions allow input from the user to 
the system. Many of the inputs are not direct 
real-world inputs, but two that are usefu! are the 
locator (mouse) and string input functions. These 
inputs, Ifke the other two inputs, (which | will not 
discuss) valuator and choice, have two states, The 
most useful state Is the request state. When the 
computer is requesting, It waits until the Input of 
the device desired is entered before proce: ing. In 
the sample state, VD! will simply look at whatever {s 
going on at the given moment, whether the user is 


ready or not. To set the device type (locator, 
valuator, choice, or string) and the input mode 
(request or sample), VDI provides the programmer with 
the command VSIN MODE (input functions are handied on 
a much higher level in Multi-FORTH, which has no need 
for VSIN MODE), The first parameter VSIN_MODE takes 
fs tor the Input device, and the second for the input 
mode. The correct device and mode must be set before 
invoking any of the eight basic (four times two) 
input functions. If the mode is set incorrectly, 
havoc will result when the 
calledese 

To request a locator input, VSIN MODE must be set 
to device one, mode one. After that is taken care of, 


Input routine is 


the programmer passes the starting coordinates of the 
mouse cursor and the addresses of the 
user-initfalized variables xout, yout, and term to 
VRQ_LOCATOR. VRQ LOCATOR wil! terminate ONLY WHEN 
either a key or ‘mouse button has been pressed. The 
variable term will hold the type of termination; 30 
tt VRQ_LOCATOR was terminated by the left button, 3 
if VRQ_LOCATOR was terminated by the right button, 
and a corresponding asci! value if VRQ_LOCATOR was 
terminated by a keypress. Xout and yout, of course, 
will hold the x and y coordinates of the mouse cursor 
at the moment of termination. 

In order to start a string request input, 
VSIN_MODE parameters must be set for device four, 
mode one. The parameters for the the string request 
fnput, or VRQ_STRING, are the maximum length of the 
string in characters, the echo mode, the array 


containing the coordinetes of the start of the echo, 
and the address of the string which will store the 
input. The echo mode does not really matter, since 
characters do not normally echo, and therefore, the 
Importance of the echo array is nil as well. 
Unfortunately, the string input is a C string 
(different from a Forth string), which makes it 
difficult to manipulate. The two events that will 
stop VRQ_STRING are a carriage return or a full 
buffer, which fis when the user has typed in more 
characters than were specified in the maximum length 
parameter. Of course, a crash would stop things for 
good just as easilyse. 


Table 3: INPUT FUNCTIONS 


Op. Code | Name ! Syntax 


BS | VSIN MODE (N/A) i ( devicetype, mode 
1 i=) 
28 | YRQ_LOCATOR (N/A) | ( x y xout yout 
term 
7 ew) 
31 VRQ_STRING (N/A) ( maxtength echo- 


mode echoxy 


1 
1 
1 
th 
i 
| string -- ) 


device desired to be selected 
Locator (mouse) 


devicetype: the 


1s 


2 = Valuator (up and down arrows) 
3 = Choice (keyboard) 
4 = String (string input) 


mode: the mode desired to be selected 

1 = request (walt until input) 

2 = sample (do not walt for Input) 
x and y: the starting x and y coordinates for the 
mouse cursor (pointer). 
xout: user-Initfalized variable that contains the x 
position of the mouse after termination of 
VRQ_LOCATOR, 
yout: user-initialized variable that contains the y 
position of the mouse after termination of 
YRQ_LOCATOR. 
term: user-initialized vartable that contains the 
terminating code after termination of VRQ_LOCATOR. 

30 = left button termination 

31 = right button termination 

other = ASCII equivalent from keyboard 
maxlength: maximum specified length in characters of 
the input string. 
echomode: determines whether or not keyboard input 
for VRQ_STRING ts echoed to the device handle (but 
doesn't seem to work!) 

0 = echo off 
1 = echo on (doesn't work...) 

echoxy: address of array containing word values of 
the x and y coordinates for the start of echoing. 
Needed even when echomode Is set to "off." 
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string: user created array that will pop its address 
onto the stack. After VRQ_STRING has finished, the 
vartable string will contain aC string that can be 
"packed" Into a Forth string and then used by 
Forthmacs. 

Note: these two input functtons WILL NOT work with 4x 
FORTH. 


EXAMPLE 4 (Forthmacs) 


Type: 
\ Move mouse and then terminate with button or 
keypress 
varfable xout variable yout variable term 
: walti lmouseymvt 
200000 0 do toop 
11.1 vsin_mode 
1 320 200 xy.scale xout yout term vrq_locator 
e" Starting potnt is center of screen, or” cr 
(320, 200) for mono," cr 
(320, 100) for medium res," cr 
2" (160, 100) for low res." cr 
e" End point fs " xout ? 2" , ™ yout ? cr 
Terminating action {s =" term ? 


" 


waltt Imouseymvt 
EXAMPLE 5 (Forthmacs) 


Type: 

\ Request a string Input 

«( Please type something up to 20 characters long. ) 
14 1 vsin_mode 

create astring 20 allot 

create xyarray 0 w, Ow, 

115 0 xyarray astring yrq_string 

e( You just typed) cr 

\ creating another string (FORTH packed string) 
create prstring 15 allot 

\ convert C string to Forth string 

astring astring cstrien prstring pack drop 

\ Print the string 

prstring ". 


Example 4 puts the mouse cursor on the screen and 
then lets the user move it around until a key or 
button Is pressed. Once this happens, the word 
waltilmouseymvt (or WAIT untlL MOUSEY MoVemenT) will 
print out the ending coordinate of the mouse and the 
terminating value. The next example simply asks for a 
string, converts i+ into a Forth string, and prints 
the string out. If there is enough interest, | will 
write a column comparing Forth and C strings in the 
future; for now just copy the above to suit your 
needs. 
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Inquires: The Reversed Attributes 

VDI inquirtes are basically calls that return the 
values of the VDI attributes such as line types, Itne 
color, fill types, text sizes, etc, The general! form 
for a VDI tnquiry is ( [some parameters] array -- ), 
The parameters may vary, but the address of the array 
must be passed so that the vartous attribute values 
can be inserted tnto the array. The array should be 
anywhere from 6 to 64 bytes long and will almost 
always be segmented by words (16 bits) instead of the 
normal 32 bit divisions. The most difficult aspect of 
understanding inquirtes ts the Interpretation of what 
the numbers in the array mean. Once there is a 
reference source for these numbers, using inquiries 
becomes easy, 
Table 4; INQUIRIES 
Note: To understand the ranges and meaning of 
Parameters further, refer to the September '86 A Step 
Forth and the above discussion of text attributes. 


Inquiry Name: VQ_COLOR (VColor?) 
Corresponding Attribute: VS_COLOR 
Op Code: 26 
Syntax: ( colorindex setflag rgb[3] -- ) 
Multi-FORTH: ( colorindex setflag -- red 

green blue colorindex ) 
Parameter meanings 

colorindex: the # of the color to be inqutred 
upon (0-15 low res, 0-3 medtum res, 0-1 high res) 

setflag: 0 = return index of indexed color (will 
try find color make up of tndex 13 in medium res, for 
example, ) 

1 = return index of realized color (will 

adjust If Index is out of range) 

rgb[3]: a user initialfzed array of three 
elements (6 bytes). 

rgb(1) (the first element of the array rgb[3}) or 
red: red Intensity 

rgb(2) ( the second element of array rgb({3] or 
green: green fntensity 

rgb(3) or blue: blue Intensity 


Inquiry Name: VOL_ATTRIBUTES (VLine?) 
Corresponding Attributes: VSL_TYPE, VSL_COLOR, 
VSWR_MODE, VSL_WIDTH 
Op. Code: 35 
Syntax: ( attrib[4] -- ) 
Multi-FORTH: ( -- width style color# 

draw-mode ) 
Parameter mean ings 

attrib{4]: a user intttaltzed array of four 
elements (8 bytes). 

attrib(1) (first element of the array attrib[4]) 
or style: line type 

attrib(2) or color#: !I!ne color index 

attrib(3) or draw-mode: line drawing mode 

attrib(4) or width: line width 
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Inquiry Name: VQM_ATTRIBUTES (Multi-Forth: N/A) Parameter mean Ings 

Corresponding Attributes: VSM_TYPE, VSM COLOR, elementnumb: text face number to be passed for 
VSWR_MODE, VSM HEIGHT name! 32] 

Op. Code: 36 name[32]: user initialized array of 32 bytes that 
Syntax ( attrib[4] -- contains the string the speels out the type of text 
Parameter_meanings face inquired by elementnumb. Name[32] will be a C 


attrib[4]: a user initialized array of four string. 
elements (8 bytes). 
attrib( 1): marker type EXAMPLE 6 (Forthmacs -- Mach 2 will work similarly, 
attrib(2): marker color index and Multi-FORTH inquiries should be performed with 
attrib(3): marker drawing mode the words and syntax listed above) 
attrib(4): marker height 
\ Rgb 
Inquiry Name: VOF_ATTRIBUTES (VFI112) create rgbarray 3 allot 
Corresponding Attributes: VSF_INTERIOR, VSF COLOR, 11 0 rgbarray vq color 
VSF_STYLE, VSWR MODE rgbarray wa . rgbarray 2+ wa . rgbarray 4+ wa. 
Op. Code: 37 cr 
Syntax: ( attribl4] -- ) \ Line 
Mult{-FORTH: ( -- border? pat# style color# create vqlattrib 4 allot 
draw-mode ) 1 vqlattrib vql_attributes 
Parameter meanings valattrib wa . vqlattrib 2+ wa vqlattrib 4+ wa . 
attrib[4]: a user Inittalized array of four vqlattrib 6 + wa . 
elements (8 bytes). cr 
attrib(1) or style: Intertor fill style \ FUll 
attrib(2) or color#: Interior fill color index create vqfattrib 4 allot 
attrib(3) or pat#: intertor till pattern 1 vqfattrib vqf_attributes 
attrib(4) or draw-mode: interior fill drawing vqfattrib wa . vafattrib 2+ wa vqfattrib 4+ wa. 
mode vqfattrib 6 + wa. 
border?: border on/off cr 
\ Text 
Inquiry Name: VQT_ ATTRIBUTES (VText?) create vqtattrib 10 allot 
Corresponding Attributes: VST_FONT, VST COLOR, 1 vqtattrib vat attributes 
VST_ROTATION, VST ALIGNMENT, VSWR MODE, VST POINT, vgtattrib wa . vqtattrib 2+ w@ vatattrib 4+ wa . 
VST_HE I GHT e vatattrib 6 + wa. 
Op. Code: 38 vatattrib 8 + wa . vqtattrib 10 + wa vatattrib 12 + 
Syntax: ( attrib[10] -- ) wa . vqtattrib 14 + wa 
Mult i-FORTH: ( -- angle horz vert font# color# vatattrib 16 + wa . vqtattrib 18 + wa. 
draw-mode ) er 
Parameter meanings \ Text face 
attrib 10}: a user initialized array of ten create name 32 allot 
elements (20 bytes). 10 name vqt_name 
attrib(1)or font#: text face : saytext 32 0 do name i + cd emit loop ; 
attrib(2) or color#: text color index saytext cr 
attrib(3) or angle: text rotation angle varfable Inputmode 
attrib(4) or horz: horizontal text alignment 1 1 inputmode vqin_mode 
attrib(5) or vert: vertical text alignment \ Input mode = 
attrib(6) or draw-mode: text writing mode Inputmode 2 . 
attrib(7): character width 
attrib(8): character height The above example shows how to get the values of 
attrib(9): character cell width inquirtes. There are stil! more VDI functions, and 
attrib(10): character cell height perhaps if there is enough demand, | can discuss VDI 
at an even greater length. Next month, | will present 
Inquiry Name: VOT_NAME (Mult {-FORTH: N/A) the different ways AES is accessed by various ST 
Op. Code: 130 Forth systems, Some methods are simple and painiess, 
Syntax; ( elementnumb name[32] -- ) and others are not so easy, Each offers its own 
Continued on page 47 --> 
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by Eric Thornton 


A highly placed source at ATARI informed me a 
couple of months ago that the new ST BASIC was in 
the last debug stages, and will remain so for an 
Indeterminate length of time, (which should not 
exceed 6 months), and that we should not be 
displeased with the finished product. Well, 
depending on how | feel at the time | could be 
displeased with Ghandi. 

|f neccessary | will also support in thls column 
other BASICs which are already on the market. 

To review slightly (for those who may have missed 
the last Issue.) {| am covering the more likely VDI 
and AES calls from ST BASIC. 

Now before we go Into a full scale application in 
ST BASIC, let's go over the full calling proceedure 
for VDI and AES calls. If you missed the fast 
issue, Beg, Borrow or Buy a copy. 


VD! OPERATIONS (Only common ones) 
Common variables 
read description of function for value to 
place here, 
Xl= x coordinate of first point 
Yi= —-y coordinate of first point 
x coordinate of second point 
y coordinate of second point 
Repeat same type of values. 


YDI ATTRIBUTE FUNCTIONS, ,,continued 
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SET GRAPHIC TEXT COLOR; 
Lets you set the color which will be used for all 
graphic text, until changed, 


Element - Contr! Intin  Ptsin Intout Ptsout 


+0 22 
42 0 
+4 

+6 


reg no. 


SET TEXT EFFECTS: 

The effect is set by the 6 most least significant 
bits passed in intin+0. Add up these values as 
required, O=normal, 1=bold, 2=l!ight, 4=Italic, 
8=underline, 16=outline, 32=shadowed, 


Element - Contr! Intin  Ptsin 
+0 106 effect 
0 


Intout Ptsout 


+4 
+6 


FILL FUNCTIONS: 

The normal ST BASIC commands for color and fill 
pattern do the same job as the equivalent VDI calls. 
So use BASIC's commands instead. 


SET FILL PERIMETER VISABILITY: 
Not supported by BASIC is fill perimeter. This 
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Help for Express 
FORTRAN Tutor 


IN THiS ISSUE 
MIDI and 


C 


is almost (bet sot quite) 2s cacy 2s 

5 calls are made In 2 slightly 

er than \D\ calls. First The arrays 
command are not as clear as the VDI 
tarting addresses for the GEMSYS 

d In memory In a table called G8, and 
u get them out. 

slightly different names for the 

to differentiate them from the VDI 
milar functions. The array CONTROL, 
ke CONTRL, in this case it is handled 
command and you won't need to worry 


Ri 
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+8)*2*16+peek(gb+10) 

' funny but, what it does is: Peek a 

ight bytes from the start of table 
hat so it becomes the hi word of this 
retrieving and then peek the low word 
further along in this table and add 


and col=peek(intout+2). Val=1 If point set. 
Element - Contr! Intin Ptsin Intout Ptsout 
+0 105 xt val 
+2 1 yl col 
+4 
+6 0 


VDI INPUT FUNCTIONS: 

These functions are primarily not useful, unless 
you are going to throw out ST BASIC's entire 
environment. Which we will do later, hence these 
fuction wil! be explained at that time, 


GET MOUSE BUTTONS AND LOCATION: 

Pretty straight-forward, poke In the right 
values, make the call, peek out the answer. This 
function from BASIC is so slowe.. 1 can't recommend 
that you use it for anything which requires a quick 
response time. Bval=1 if button pressed. X1 and Y1 
are the x and y coordinates of the current 
locatton, 


Element - Contr! Intin Ptsin Intout Ptsout 
+0 124 bval 
+2 0 xd 
+4 yl 
+6 0 
AES CALLS 


Application Environment Services: I+ may sound 


like a social service orgranization, but it isn't. 

Most of the AES calls are out of the range of 
most BASIC programs, so |'|| just cover a few of the 
more important and useful ones. 
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Most of The time this Is the only array you will 
need to know about for GEMSYS calls. In case you're 
curious here are the formuli for the rest of them. 
GINTOUT=peek(gb+ 12)*27 16+peek(gbt 14) 

GADDR I N=peek(gb+16)*27 16+peek(gb+18) 
GADDROUT=peek( gb+20)*2” 16+peek(gb+22) 


Here is an example which shows how to use GEMSYS 
to find out the graphics handle of this application 
(BASIC) and the current width and helght of 
characters and their rows and columns. 


10 REM call GEMSYS (grat_handle) 

20 GINTOUT=peek(gb+12)*2* 16+peek(gbt+ 14) 

30 GEMSYS 77 2! 77 is the opcode for this 
function 

40 grhand le=peek( GINTOUT+0) 
50 charw=peek(GINTOUT+2) 

60 charh=peek( GI NTOUT+4) 

70 colw=peek( GINTOUT+6) 

80 rowh=peek( GINTOUT+8) 


:' graphics handle 


GET INFORMATION ABOUT A WINDOW: 


GEMSYS 104 
Peek the AES window handle from systab+? (see 
BASIC SOURCEBOOK) and use it here to find out about 


the window, Inner, outer, previous, max sizes of 
the window, positions of the slider, ete. For now 
I'll show you how to use It to find the inner 
dimentions of a window in pixels (probably the most 
useful). 
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More --> 


A 


oe 


Desk File 


A highly placed source at ATARI Informed me a 
couple of months ago that the new ST BASIC was in 
the last debug stages, and willl remain so for an 
indeterminate length of time, (which should not 
exceed 6 months), and that we should not be 
displeased with the finished product. Well, 
depending on how | feel at the time | could be 
displeased with Ghandi. 

lf neccessary | will also support in this column 
other BASICs which are already on the market. 

To review slightly (for those who may have missed 
the last {ssue.) | am covering the more likely VDI 
and AES calls from ST BASIC. 

Now before we go Into a full scale application in 
ST BASIC, let's go over the full calling proceedure 
for VDI and AES calls. If you missed the last 
issue, Beg, Borrow or Buy a copy. 


YD! OPERATIONS (Only common ones) 
Common variables 


2s read description of function for value to 
place here, 

X1= x coordinate of first point 

Yl= — y coordinate of first point 


X2= &x coordinate of second point 
Y2=  y coordinate of second point 
Repeat same type of values. 


YD ATTRIBUTE FUNCTIONS, ..continued 
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User Group Special 


Just send in 5 or more subscriptions 
at the same time together with a letter 
or newsletter from your ST-oriented User 
Group or ST Special Interest Group (SIG) 
and qualify for a yearly subscription to 
ST Applications for only $30 each. 
That's right, 12 issues for $2.50 each!! 

There's no limit to how many members 
can apply as long as 5 or more subscribe 
at a time. 


SThop 


P.O. Box 980 
Forestville, CA 95436 
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SET GRAPHIC TEXT COLOR: 
Lets you set the color which will be used for all 
graphic text, until changed. 


Element - Contr! Intin  Ptsin Intout Ptsout 


+0 22 reg no. 
42 0 

+4 

+6 i) 


SET TEXT EFFECTS: 

The effect is set by the 6 most least significant 
bits passed in intin+0. Add up these values as 
required, O=normal, |=bold, 2=light, 4=Italic, 
8=underline, 16=outline, 32=shadowed. 


Element - Contr! Intin  Ptsin Intout Ptsout 


+0 106 effect 
+2 te) 

44 

+6 1 


FILL FUNCTIONS: 

The normal ST BASIC commands for color and fill 
pattern do the same job as the equivalent VDI calls. 
So use BASIC's commands Instead. 


SET FILL PERIMETER VISABILITY: 
Not supported by BASIC is fill perimeter, This 
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function lets you turn on and off the visablility of 
the perimeter on fill functions. Flag value=0 if 
frame to be turned off, and 1 if frame on wanted. 


Element - Contr! Intin 
+0 104 flag 
+2 o) 
+4 
+6 


Ptsin Intout Ptsout 


RASTER OPERATIONS: 

This set of essentially Interesting but looney 
functions are practically impossible to explain. 
However, | will explain them in a later issue. (when 
| have more space,) They can be used from basic to 
BLIT a section of screen around or to copy images 


trom array to screen and back again. 


GET PIXEL: 

Returns the set or cleared status and the color 
of any point on the screen, in val=peek(intout+0) 
and col=peek(intout+2), Val=1 if point set. 


Element - Contr! Intin  Ptsin Intout Ptsout 
+0 105 xt val 
+2 1 yl col 
+4 
+6 


VDI INPUT FUNCTIONS: 

These functions are primarily not useful, unless 
you are going to throw out ST BASIC's entire 
environment. Which we will do later, hence these 
fuction will be explained at that time, 


GET MOUSE BUTTONS AND LOCATION: 

Pretty straight-forward, poke in the right 
values, make the call, peek out the answer, This 
function from BASIC Is so slow... | can't recommend 
that you use it for anything which requires a quick 
response time. Bval=1 if button pressed. X1 and Y1 
are the x and y coordinates of the current 
location. 


Intin Ptsin 


Element - Contri 
“40 124 bval 
+2 0 bal 
+4 yl 
+6 


Intout Ptsout 


AES CALLS 
Application Environment Services: I+ may sound 


like a social service orgranization, but it Isn't. 

Most of the AES calls are out of the range of 
most BASIC programs, so I'll just cover a few of the 
more important and usefu! ones. 


ST pplications 


Calling AES Is almost (but not quite) as easy as 
VDI calls. AES calls are made in a slightly 
different manner than VDI calls. First the arrays 
for the GEMSYS command are not as clear as the YDI 
arrays. The starting addresses tor the GEMSYS 
arrays are held In memory in a table called G8, and 
this is how you get them out. 

Iwill use slightly different names for the 
GEMSYS arrays to differentiate them from the VDI 
arrays with similar functions. The array CONTROL, 
while It is |!ike CONTRL, in this case it is handled 
by the GEMSYS command and you won't need to worry 
about It. 


GINTIN=peek(gb+8)*27 1 6+peek( gb+10) 

Looks kinda’ funny but, what It does is: Peek a 
word that Is elght bytes from the start of table @ 
and multiply that so it becomes the hl word of this 
address we are retrieving and then peek the low word 
from two bytes further along in this table and add 
it In. 

Most of the time this is the only array you wil! 
need to know about for GEMSYS calls. In case you're 
curious here are the formuli for the rest of them. 
GINTOUT=peek(gb+12)*27 16+peek( gb+ 14) 

GADDR | N=peek( gb+16) #27 16+peek(gb+18) 
GADDROUT =peek( gb+20)*2* 16+peek(gb+22) 


Here is an example which shows how to use GEMSYS 
to find out the graphics handle of this application 
(BASIC) and the current width and height of 
characters and their rows and columns. 


10 REM call GEMSYS (graf_handle) 

20 GINTOUT=peek(gb+12)*2* 16+peek(gb+ 14) 

30 GEMSYS 77 :' 77 is the opcode for this 
function 

40 grhand le=peek( GINTOUT+0) 
50 charw=peek( GINTOUT+2) 

60 charh=peek( GINTOUT+4) 

7O colw=peek( GINTOUT+6) 

80 rowh=peek( GINTOUT+8) 


z' graphics handle 


GET INFORMATION ABOUT A WINDOW; GEMSYS 104 

Peek the AES window handle from systab+? (see 
BASIC SOURCEBOOK) and use it here to find out about 
the window, Inner, outer, previous, max sizes of 
the window, positions of the slider, etc. 
I'll show you how to use It to find the Inner 
dimentions of a window In pixels (probably the most 
useful). 
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For now 


More --> 


Element - GINTIN GINTOUT GADDRIN GADDROUT 


+0 wihand 

+2 4 xt 

+4 yl 

+6 width 

+8 hel ght 

The rest of the AES window functions will have to 


walt for later as they are soooo very complex. 


G1 GRAPHIC RUBBER BOX: GEMSYS 70 

Wait until the left mouse button is pressed 
betore calling this function, as it returns 
automatically when the button Is released; 
immediately If it is not pressed at all. Same as 
the rubber box on the desktop, Passed are the x and 
y of the upper left of box and the minimum width and 
helght the box may attain, Returned are the last 
width and height of the rubber box when the user let 
go of the left button. 


Element - GINTIN G{NTOUT GADDRIN GADDROUT 


+0 xt 
+2 yl lastw 
+4 mintw lasth 
+6 minth 
+8 

GRAF MOUSE: GEMSYS 78 


Change the mouse's current form to another 
predefined form. Values range from 0-7 and forms 
range from the arrow with which we are all fami liar 
to an outlined crosshair. 


Element - GINTIN GINTOUT GADORIN GADDROUT 


+0 mform 0 
2 (0) 
+4 
+6 


+8 


There are a lot more AES calls, however, most of 
which you'll never use from BASIC, The ones I've 
covered are only those that | have found an occasion 
to use In my own programs, which I'I| share with you 
as time goes on, 

Look forward to the upcomming issues, as | am 
indeed building up to something. Next Issue: Load 
your NEOchrome picture filles Into ST BASIC with 
their proper colors. 
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More Diskette Control from page 24 


1s one of the co-creators of the MI Iler code and is 
the creator of the "Miller-squared" code. Mr. 
Mallinson gave a lecture at a local university, on 
1979Mar12, discussing “the development of digital 
tape recorders with extremely high data rates and 
areal densities.", and provided me with coples of 
three papers on magnetic recording. Both Mr, 
Mallinson and Mr. Miller were from Ampex at the 
time of this paper. 

(2) "The Recording and Reproduction of Signals on 
Magnetic Medium Using Saturation-Type Recording" by 
Je Je Miyata and R, R, Hartel; IRE Transactions on 
Electronic Computers, Vol EC-8 No. 2, pp. 159:169, 
June 1959, "This paper discusses the vartous 
factors affecting the resolution in saturation 
magnetic recording. The effect on the recording 
Process of the... coating thickness, record -head 
gap width, head -to-coating separation, 
sel t-demagneti zation, and record-head residual 
magnetization are discussed." This information is 
presented In tables and graphs, and equations are 
Provided for calculating these effects. 

(3) "Increased Magnetic Recording Read-back 
Resolution by Means of a Linear Passive Network™ by 
H. M. Sierra; 1BM Journal ,pp. 22:33, January 1963, 
This paper deseribes a relatively complex Passive 
network which narrows the data pulses tn the 
Playback amplifier in order to (a)improve data 
accuracy or (b) increase recording density. The 
network uses differential input and output, and 
uses only capacitors and inductors. Complete 
information is given tn normalized form, and a 
specific example Is also given, 

There are many good Papers on the subject of 
magnetic recording, but these three are the best 
overall, Copies can be obtalned Through the 
InterLi brary Loan department of your local library. 
A Col lege/University library may even have them 
(and other goodies!) In its collection. 
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A Letter from Jim Wilson 


| have just finished your article in the August 
ST APPLICATIONS, | don't mean to be hard on you; 
God knows low-level Programming is tough enough. 
But there are some Problems with what you have 
written which are bound to get anybody following 
your path into problems. 

The so-called documentation Package is built 
around the idea that, as long as some basic rules 
are followed, it is possible to bulld libraries 
that can be called either from assembly language 
source code or from C source code (and presumably 
later from any other language which has a 
comptler/lInker setup that conforms to the same 
standards). 

With that in mind, the Programmer should be 
encouraged to begin by writing all of his general 
assembly routines not into a Program, but into 
libraries which can be linked to anything he writes 
later. Here are some of the standards: 

1. Some registers cannot and others should 
not, be carried across library routines. Registers 
d0-d2 and a0-a2 are universally treated as scratch 
registers, and are not protected in library 
routines, If you pass control toa library routine 
and you are using any of these 6 registers, you 
must protect them before you pass control, and 
recover them on return, because whatever is In the 
standard library will NOT do it for you 

2. Register dO Is the "message drop' register, 
even for functions that return nothing but error 
messages. If a routine returns a single value, it 
will be in dQ. If there is an error, the error 
message is passed in dO. If a routine returns more 
than one value toa caller, then d0.! is a pointer 
to those values in memory. 


First Machine Language Program 


by Tom McAlister 


3. Arguments passed to a 'Tbrary routine must 
be pushed, in reverse order, on the current stack, 
keeping in mind that byte size operations on the 
stack are illegal. Arguments may elther be data 
(16, 32-bits), or pointers (32-bits), or a mix, 
8-bit data must be right justified in 16-bit 
format, and forever treated as a word. 

4. Library routines make liberal use of stack 
frames. The 68000 lacks a frame pointer, and 
register a6 is the universal choice. It may be best 
not to use a6 for any other purpose, 

5. Each program may have one and only one 
starting point, which must be labeled 'main', The 
starting point may be either in C ('main') or 
assembly (' main') source code. The reason tor the 
underscore is to make an assembly language source 
comply to common standards; the second phase of the 
C compiler appends an initial underscore, so to 
call any routine In aC compatible library from 
assembly, or to place an assembly language routine 
into a library callable from C, the Programmer must 
add an underscore, 

6. A library routine, and every label sought 
by the linker, including the assembly fabel 
“_main', must be deciared as 'globlt: 

globl _label1, label2 

(Note that ' label 1"! could be called from 
either C or assembly, but 'label2t only from 
assembly, even If label2 conforms in all other 
respects to the library standards.) You can, for 
example, print out your null terminated message 
strings by simply linking to the ' printf! function 
In 'gemlibsot and supported by IIbf.o: 


St, 


\pplications 
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pea string(pc) 
bsr _printt 


7. The support libraries Included in the 
cocumentation package, and the ones to be written, 
work with the 'startup' object modules that are 
essential in linking together programs from 
libraries and source, such as ‘apstart.o' and 
'gemstart.o', 

Do not forget to begin your main assembly 
source code with: 


glob! 
_main 


to maintain ‘startup! compatibility. 

If the first column in a line of assembly is 
occupied by something other than an asterisk, it Is 
assumed to be a label. Labels that begin in this 
column do not need a terminating colon: 


label move.! (a0)+,(al)+ 
dbf dO, label 


Pseudo-ops do not have to begin with a dot: 


bss 


but you can use dots if you like. The assembler 
will have no trouble at all with any mix of colons, 
no colons, dots, no dots, as long as you adhere to 
columnar rules. It Is legal to indent labels and 
terminate them with colons; it may even be neater, 
But it is only a stylistic device, and not 
particularly easy to read. 

It Is WRONG, WRONG, WRONG to advocate departing 
from system programming standards, Either 
‘apstart.o' or 'gemstart.o' (there are other 
startups for GEM) do a lot of housekeeping, 
including stack management, as long as one or the 
other is declared to the linker, and with a "main! 
in the primary source: 


link68 [u} #1.68k=apstart,%1, libraryx, |i braryz 


The programmer can, and probably should, be 
encouraged to drop the 'text' pseudo-op, and refer 
to constant data and strings as: 


lea labe I(pc) 


This saves one word of code, and several cycles in 
execution; there is a problem, however, if the PC 
is > 32K from the target, due to wraparound. There 
are ways around that, too, but no problem until you 
write big programs. 
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Similarly, the programmer should be encouraged 
to reserve an address register as a static base 
pointer (a5 preferred), and load it with the 
address of the first item in the 'bss', He can 
then code from that base pointer and avoid absolute 
addressing, which is C/PM86K's default (and very 
wasteful of memory and time) mode. The comments 
about wraparound apply here, too: 


sb equ a5 
lea label,sb 
moveew label5(sb),d0 


This will convert any address within 32K from the 
static base pointer into 'd16(sb)' form, again 
saving one word and several cycles per access. 
There is an unfortunate misprint in Atari's 
documentation; the '-u' switch asks the assembler 
to reserve a space in the symbol table for all 
"undefined (external)', not 'underlined', labels. 
Without this reservation, you couldn't link to 
libraries, because assembly would fail on the first 
undefined label. The linker resolves all external 
references, looking for matching 'globl' 
declarations in the libraries on the link line. 
Hang in there! Nobody said it was supposed to 
be easy. 
Jim Wilson 
Los Angeles, CA 


Response 


| am impressed that you would put the effort 
you did into your letter commenting on my First 
Machine Language Program, Of course the points you 
make about observing conventions are crucial. | 
tried to link the starting subroutine in object 
code and failed as you know. You explain how. The 
advantage you point out Is that the module might be 
invoked from C and assembly both. | intend to 
master the technique and appreciate the specifics 
In your letter. | also appreciate your concern for 
order and thank you for your patience. | want to 
follow the consensus on register allocation. Thanks 
for the information. The fact that this is no 
trivial matter and is a deliberate part of the ST 
system Illustrates a point | myself was trying to 
make, namely machine language on ST goes far beyond 
the instruction set of the 68000. | am glad to see 
it all documented in ST APPLICATIONS, rather than 
each man eke it out on his own. More! 

You are right In detecting that | don't warm to 
the Idea of subroutines as linked object code. | 
like to see what |'m doing. Although far from 
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programming in C, | do want to understand how my 
doings stack up against the requirements of the 
Development C compiler and also the other C 
compilers, present and to come. I'd like to 
understand the non-C languages; not syntax, rather 
the impact of the compilers upon ST 
machine-programming. | wonder how Modula-2 reacts 
to '_main'? Assemblers appear to be proliferating, 
but will many have linkers? 

| am heartily in favor of building library 
modules, Cannot make progress until | collect some 
(ever the bane of Assembler Programming). | may 
take advantage of certain C libraries, mainly 
floating point. Until Richard Frick of Atari 
straightened me out last week, | believed the 
documentation where it said no floating point was 
provided to add, subtract, multiply, divide. 

Out of habit, | intended to disassemble to 
incorporate C Library modules. It dawned only 
slowly that | could link; which could prove a great 
boon, provided | don't have to disassemble in order 
to determine the parameters. You were good enough 
to mention general guidelines on parameters. Here 
then is what the conventions you advocate may do 
for me as a machine language programmer; give me 
easy access to C-libraries. ("Today the parameters, 
tomorrow the world.") | will label with ‘main’; 
costs nothing and permits linking any time later at 
the binary level. 

What | advocate departing from is not C. 
Frankly it is GEM and the VDI. | like GEM as an 
interface for the Disk Operating System but not 
universally in applications. The GEM/VDI ‘system! 
seems impossible to avoid within the rules being 
followed to program ST without learning how the 00S 
functions. | seek instead to learn the DOS and to 
bypass the ‘rules!’ in order to avoid GEM/VDI. 

Programming with GEM and the VDI is highly 
complex. | am afraid ST will grow obsolete before 
learn GEM in my spare time. Working outside the 
system may be no crime, | plead, under 
circumstances where | have little prospect of 
accommodating the system in my lifetime or the life 
of the computer. | shudder to think which. At the 
same time | hesitate to credit the wholesale 
programming efficiencies claimed for GEM/VDI, and | 
question the bid for universal applicability. 

The tiny program in the article excerpted a 
goodly portion of the stack handling from the 
source equivalent ‘apstart.s!' of the linkable 
utility 'apstart.o', Stack handling is an instance 
to me of DOS capabilities which really demand 
explicit exposition. Perhaps you agree. I've been 
experimenting with the Symbolic Interactive 
Disassembler, SID. You know, SID can choose and 
load another program above itself and tell where tn 
memory the chosen landed. When | load different 


— 
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Programs, their starting points, which | take to be 
$ID-ending points, vary appreciably. SID in fact 
goes in and out like an accordion. Some fancy stack 
handling going on there; worthy of exposition. 

Ahem! Did they get this fancy stack handling by 
linking a utility? | am ill-disposed to program by 
rote rules. If developing for commercial use, 
maybeeee because there is nothing like a bottom 
tine to concentrate attention upon rules. Yet 
think of possibly uncovering unsuspected commercial 
advantage. | remember the unforeseen benefits 
reaped from gratuitous thoroughness whi le 
engineering. Isn't GEMDOS significantly different 
from CP/M-68K? Who is up on GEMDOS? | merely ask 
rhetorically. , 

Little doubt but that disorder is enemy of 
bug-free programming. Little doubt on that. Good 
use will be made of the information and your 
advice. The part about commanding the assembler 
needs time to be assimilated. In effect, | plead 
guilty with an explanation. No one did tell me it 
would be easy but imagine if we could make it easy: 
A new ST landmark program would appear every week 
and with unmatched display, ST would emerge 
unbeatable! 

Tom Mc Allister 


Moving? 


We all make mistakes. 
If you have a subscription 
problem please call 
(707) 869-2325 
or 
write us at 
ST Applications 
P.O. Box 980 
Forestville, CA 95436 
If possible, please have your mailing 
label available, as well as your 
canceled check if you are having 
problems with payment. 
If moving, please give us both your 
old address and new address. 
Thank You! 


Subscription 
Problem? 
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Description of MC68000 pins 


This month: a brief description of the 
functions of the MC68000's pins, When the 
discussion turns to actual hardware applications | 


will make timing diagrams to show how the signals 
are used in reat lifes The nDTACK signal, for 


instance, is supplied by the user's hardware, but 
it controls two or more MPU states. 


t+AOO:tA23 Address lines 
nAS Address Strobe; indicates that the 
address lines are valid. 


Bus ERRor; this input tells the MPU 
that there is a ‘fatal’ bus error and 
allows recovery from the error 


Bus Grant; indicates that the MPU 
will relinquish contro! of the bus at 


the end of the current bus cycle. 

Bus Grant Acknowledge; indicates that 
some other device has actually taken 
contro! of the bus, 

Bus Request; indicates that some 
other device wants control of the 
bus. 


Clock; 8MHz input; 50% duty cycle. 
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+D00: tDOF 
nbs 


nUDS 


nDTACK 


+FCO:tFC2 
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Data tines 

Lower Data Strobe; indicates that 
data bits 00:07 are valid. 

Upper Data Strobe; indicates that 
data bits 08:0F are valid. 


Data Transfer ACKnowledge; special 
handshake signal required for data 
transfer. 


Enable/clock; £ clock output for 6800 
series peripheral devices. 40%/60% 
duty cycle derived from the 8MHz CLK 
input. 


Function Code; these lines indicate 
which address space is being used. 
(described in Vol.1 #1) 


GrouND; these pins are power supply 
ground lines (zero volts,Vss). 


HALT; input: halts the MPU. 
output: indicates MPU is halted. 


nRESET 


tD4rG 
tDS 
tD2 
tD1 
<DG 
nas 
nuDS 
nLDS 
R/nW 
oO nDTACK 
nBG 
nBGACK 
nBR 
VUccl+5U) 
CLKC8MHz) 
Ground(6y) 
nHALT 
nRESET 
nUMA 
C40/7667%> E 
nUPA 
nBERR 
nIPL2 
nIPLi 
nIPLs 
tFC2 

tFCL 

tFCO 

tABL 

tAB2 

tAGsS 

(tAG4 


data Ivo 


Address mode 
control lines 


Bus control 


H 
HHO\N GOOG 


pover 
Clock IN 
pover 


Halt & Reset 


6656 family 
iv0 space 
control 


processor 
interrupts 


address space 
control lines 


xz 
Ir 
o 
o 
x 
I 
I 
zr 
= 
Oo 
o 
o 


addresses oOuT 


tALG 
tALS 


tAL4 
tAIS 
tAL2 
tALL 
tALB 
tABGF 
tAGE 
tAGD 
tABC 
tAGB 
tABA 


Groundt6v2 


tALZ 


Ucct+5u) 


HC6BEB66 


data Ivo 


pover 
addresses ouT 


pover 


addresses OuT 


Figure 1. Pinouts for the Motorola 68000 Microprocessor. 


nIPLOzn |PL2 


Interrupt Priority Level; if the 
Interrupt number on these pins fs 
greater-than-or-equa!-to the inter- 
rupt mask tn the status register, 
an Interrupt exception occurs. 


Read /notWrite; 
high: data transferred tnto MPU 


low: data transferred from MPU 


input : resets MPU 
output: resets peripheral devices, 


these pins are the +5V power Input. 
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Valid Perfphera! Address; this input 
indicates that the MPU is addressing 
an M6800-series peripheral device, 
and that data transfer will be syn— 
chronized by the E clock, Automatic 
vectoring [s used for interrupts. 
Valid Memory Address; This output 
operates only when nVPA is low. I+ 
tells the 6800 peripherals that 

(a) thelr address lines are vali¢, anc 
(b) data transfer fs synchron! zee 
to the E clock, 


Let’s ‘C’ Now 


The feedback | have received {s that many new C 
programmers and those curious about C are reading 
this column. Rather than delve into the loftier 
aspects of Cy i am concentrating on the 
fundamentals. | also will do something for the 
advanced and keep everyone up on new releases of C 
for the ST. This month's topics are why ++ exists, 
hints for faster programs, and an initial 
Impresston of Mark Williams C. 


Hints for C novices 


The C language is very similar to English. Both 
languages have nuances that will drive novices up 
the wall. C often looks stranger than the same 
program written in PASCAL, Modula-2, or any of the 
popular high level languages available for the ST. 

On the other hand, BASIC is very easy to 
understand for almost any person starting to 
program a computer, BASIC makes simple algebraic 
statements like b = b + 1, This makes sense to many 
people. 

C was designed as a way to avoid writing in 
assembly language while retaining the power of 
assembler. People who write in assembler or C value 
short, compact program code because it runs faster. 
So b + 1 becomes bt++ (++ increments the value 
of the variable by one). 

Why did this shorthand develop? To make the 
resulting programs run faster, When the compl ter 
reads a program and sees b = b + 1, it performs the 
following steps: 
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Finds b = and realizes that b is to be 
assigned a value. 
Finds the memory location represented 
by b. 
Sees the second b and finds the memory 
location b. (Yes, it has to find it 
again) 
Sets up the needed steps for addition. 
Takes 1 as the item to be added to b. 
Performs the addition b + 1. 
Puts the result in the memory location b, 
For b++, the steps are: 

1. Finds b and fetches the value of that 
location in memory. 

2. Increments b. 

3. Replaces the value in memory. 

i} have greatly simplified the process of 
compiler parsing, but you should see the idea. Many 
people argue that PASCAL, BASIC, Modula-2, ADA, 
etc,, are easier to read than C programs filled 
with ++#'s and --!'s, However, a little time spent 
learning the unique features of C will be rewarded 
with faster running programs, 

At first the ++, ?:, .--, &, and etc. are 
confusing but 99.99% of all C programmers keep a 
cheat sheet near their keyboard. The proper name of 
this cheat sheet is the Index to C operators. The 
idea is similar to math rules like ‘multiplication 
Ts done before addition’. 

if you wish to delve into C and have no 
previous experiences, it is suggested that you: 

1. Buy a copy of a C compiler. Read the end of 
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TESTED TTS ITS OTST Tg TeveT ranyguayooy uur pee 
may have to move from high level C to assembler to 
get the speed you need, The 68000 assembler Is 
kinder than many other assembler languages, but you 
may not want to grovel in the bits. The young 
developer had a nice GEM interfaced spread sheet, 
but It was stightly slow. His code had many nested 


loops, and when 1! spotted this | had to ask two 
questions: 
1. How much free memory is left during 
execution? 
2. How much readability can you afford to 
glve up? 


Tne first question is based on the knowledge 
that a branching instruction takes the computer 
The overhead in 
jumping around memory can bog down a program. So we 
unrolled a few loops. Unrolling a loop fs basically 
like so: 


more time than an assignment. 


for GT = 0) 2) <.5-2 ta) 
foo{t] = NULL; 
becomes 
foo[0] = NULL; fool1} = NULL; foof2] = NULL; 
foo[3] = NULL; foof[4] = NULL; foo[5] = NULL; 
This saves milliseconds! Milliseconds are 


small, but this guy was looping so much that they 
began to add up to seconds! If you investigate the 
assembler code produced from the unrolled code it 
Is easy to see the overhead necessary to loop. The 
trade-off is that by unrolling loops you take up 
more memory. 

Nested loops can become extremely messy, and 
tracing a misplaced subscript Is a real pain! It fs 
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now rewriting some parts of his 
‘his becomes a tedfous task, but 
IFYe 


One of the first programs | wrote for my ST was 
a quick way to set the clock, On page 185 of the 
Abacus Internals book {fs a description of the 
format of the clock/calendar for the ST. 


BITS” DESCRIPTION 

0-4 seconds in 2 second Increments 
5-10 minutes 

11-15 hours 

16-20 day 

21-24 month 

25-31 year - 1980 (date since 1980) 


The trick to moving around the bits needed 
without getting the bits we don't want fs shift 
and masking. Shifting Is sitding the bits around 
and masking fs Isolating bits, This month's example 
Program, exdate.c, Is a clear example of this SAM. 
Here Is the output from oa C-shel |-like 
environment: 


$date Sat Aug 16 14:58:14 1986 


$exdate ST time DIO6F4E [s 8/16/1986 a> 
14:58 


The DIO6F4E [fs the system date/time 
printed In hexadecimal, Breaking down the DIO 
into binary we get: 


1101000 100000110111101001110 


To get seconds we AND (&) the time with 
need to screen five bits to get the seconds and 
hex code for five bits on fis 1F (11111 binary). 
math looks tfke: 
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Please Answer Each of These Questions 


1. This copy of ST Applications came to 
me through: 

A. Friend C. User Group 

B. Retail Store D. School 


6. I'd like to see ST Applications devote 
more coverage to: 
A. Games 
B. Business 
©. Utilities 
2. I personally use: D. Other 
A. 520ST C. Double Sided Disk Drive 
B. 10408T D. Hard Disk Drive 


E. Graphice 
F. Education 
G. Tutorials 


7.1 spent on software in the past 12 months: 
A. less than $100 D. $600-$1000 

B. $100-$300 E. More than $1000 

C. $300-$600 


3. lintend to purchase the following 
peripherials in the near future: 
A.SS Disk Drive E. DS Disk Drive 
B. Hard Disk Drive F. Video Digitizer 
C. Audio Digitizer G. MIDI Synthesizer 
D. Printer HH. Modem 


8. I use the source listings in 
ST Applications: 
A. Not at all C. Glance at them 


: B. Type them in D. Study them thoroughly 
4. Which section do you read the most: 


A. Articles B. Reviews 9. How many programs did you (will you) 


type in from this iseue? 
5. How many people will read this copy 


of ST Applications? 10. My favorite article in this issue is: 


The feedback | have received is that many new C 1. Finds b = and realizes that b is to be 
programmers and those curious about C are reading assigned a value. 
this column, Rather than delve into the loftier 2. Finds the memory location represented 
aspects of C, | am concentrating on the by be 
fundamentals. |! also will do something for the 3. Sees the second b and finds the memory 
advanced and keep everyone up on new releases of C location be (Yes, it has to find it 
for the ST. This month's topics are why ++ exists, again) 
hints for faster programs, and an initial 4. Sets up the needed steps for addition. 
impression of Mark Williams GC. 5. Takes 1 as the item to be added to b. 
6. Performs the addition b + 1. 
Hints for C novices 7. Puts the result in the memory location b. 
For bt+, the steps are: 
The C language is very similar to English. Both 1. Finds b and fetches the value of that 
languages have nuances that will drive novices up location in memory. 
the wall. C often looks stranger than the same 2. Increments be 
program written in PASCAL, Modula~2, or any of the 3. Replaces the value in memory. 


popular high level languages available for the ST. 1 have greatly simplified the process of 


On the other hand, BASIC is very easy to 
understand for almost any person starting to 
program a computer, BASIC makes simple algebraic 
statements like b = b + 1. This makes sense to many 
people. 

C was designed as a way to avoid writing in 
assembly language while retaining the power of 
assembler. People who write in assembler or C value 
short, compact program code because it runs faster. 
So b =b + 1 becomes b++ (++ increments the value 
of the variable by one). 

Why did this shorthand develop? To make the 
resulting programs run faster. When the compiler 
reads a program and sees b = b + 1, it performs the 
following steps: 
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compiler parsing, but you should see the idea. Many 
people argue that PASCAL, BASIC, Modula-2, ADA, 
etc., are easier to read than C programs filled 
with +t's and --'s. However, a little time spent 
learning the unique features of C will be rewarded 
with faster running programs. 

At first the ++, ?:, --, &» and etc. are 
confusing but 99,99% of all C programmers keep a 
cheat sheet near their keyboard. The proper name of 
this cheat sheet is the Index to C operators. The 
idea is similar to math rules like ‘multiplication 
Ts done before addition’. 

If you wish to delve into C and have no 
previous experiences, it is suggested that you: 

1. Buy a copy of a C compiler. Read the end of 
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this column for announcements on C compilers. 

2. Go to the bookstore and get at least two 
different C language Introductory texts, By 
referencing at least two books you'll be able to 
get a different view of an Item that one author may 
poorly describe, 

3. Read as many C programs as you can. Imagine 
a child learning to read but who only reads what he 
or she writes -- the kid goes no place fast. Do not 
hesitate to modify someone else's code (after you 
copy the original first!) and experiment. 

C fs not as hard as it first looks. Good luck. 


Developers 


It Is safe to say that most of the software for 
the ST Is written In C. But what happens If you 
develop your program, and [t runs slowly? Recently 
| received a call from a developer asking If | 
could help him speed up his program, C is usually 
faster that the other high level languages, but you 
may have to move from high tevel C to assembler to 
get the speed you need. The 68000 assembler Is 
kinder than many other assembler languages, but you 
may not want to grovel in the bits. The young 
developer had a nice GEM interfaced spread sheet, 
but [+t was slightly slow, His code had many nested 
loops, and when | spotted this | had to ask two 
questions: 

1. How much free memory is left during 

execution? 

2. How much readability can you afford to 

give up? 

The first question Is based on the knowledge 
that a branching Instruction takes the computer 
more time than an assignment. The overhead tn 
jumping around memory can bog down a program. So we 
unrolled a few loops. Unrolling a loop fs basically 
like so: 


for ¢. f,=0 
foolt] 


becomes 


fool0] = NULL; fool1] = NULL; fool2] = NULL; 
foo| 3] NULL; fool4] NULL; fool5] NULL; 


This saves milliseconds! Milllseconds are 
small, but this guy was looping so much that they 
began to add up to seconds! If you Investigate the 
assembler code produced from the unrolled code it 
Is easy to see the overhead necessary to loop. The 
trade-off Is that by unrolling loops you take up 
more memory, 

Nested loops can become extremely messy, and 
tracing a misplaced subscript ts a real pain! It fs 


very valuable to have self documenting code (lots 
of comments), but who would comment 1800 lines of 
foo[n] = 1007 Often the need to read a program 
offsets the need to unroll. Readability of your 
Program ts a high goal, but sometimes one goal has 
to be sacrificed for another. 


It also helps to go through your slow program 


with a fine tooth comb! Most programmers have an 
extra varfable or two s{tting around [n large 
programs that have no use. And upon closer study, 
it [ts amazing how some functions can be mde 
faster. (For more informatton on speeding up © 
Programs: Efficient €, Pium Hall Publishing, by 
Plum and Brodle.) 

But C does have It's Iimits! The young developer 
who called me is now rewriting some parts of his 
code in assembler. This becomes a tedious task, but 
sometimes Is necessary. 


Shifting and Masking 


One of the first programs | wrote for my ST was 
a quick way to set the clock. On page 185 of the 
Abacus Internals book [s a description of the 
format of the clock/calendar for the ST. 


BITS: DESCRIPTION 
0-4 seconds In 2 second Increments 
5-10 minutes 

11-15 hours 

16-20 day 

21-24 month 

25-31 year - 1980 (date since 1980) 


The trick to moving around the bits needed 
without getting the bits we don't want Is shifting 
and masking. Shifting ts sliding the bits around 
and masking Is Isolating bits. This month's example 
program, exdate.c, is a clear example of this S&M. 
Here Is the output from a C-shel|-like 
environment: 


$date Sat Aug 16 14:58:14 1986 
$exdate ST time DIO6F4E is 8/16/1986 at 


14:58 


The DIO6F4E fs the system date/time format 
printed in hexadecimal, Breaking down the DI06F4E 
Into binary we get: 


110 1000100000 110111101001110 


To get seconds we AND (&) the time with IF. We 
need to screen five bits to get the seconds and the 
hex code for five bits on fs 1F (11111 binary). The 
math looks |Ike: 
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1101000 100000110111101001110 
mii 
0000000000000000000000001110 


Remember (18 1) = 1 and (1&0) = 0. So we 
have 0x1110 or 14 seconds. It was only necessary to 
mask to get the seconds. To get minutes, we'l! have 
to shift and then mask, 

For minutes, we have to shift over 6 bits to get 
past the seconds. DIO6F4E right shifted five times 
becomes: 


0000011010001000001101111010 
So now we mask another six bits: 


000001 1010001000001101111010 
Wi 
0000000000000000000000111010 


111010 is binary for 58. The rest of the 
conversion is left as an exercise for the curious. 
And no, | have not found out why the hours are off 
by 1. The following program was compiled with Mark 
Williams © (works with Megamax but watch out for 
Print tlceelXelee) eo 


Oe exdate.c A simple example of 
converting the systems 
internal time into human format*/ 


#include "osbind.h" 
main(){ unsigned tong time; 

int secs, mins, hrs, days, mons, yrs; 
a Grab system time Hy 


time = Gettime(); 


Chew the bits + 


secs = ( time & Ox00It) << 1; 

/* bits 0:4 */] 
mins = ( time >> 5) & Ox3F; 

PPeeebttss 5210. */ 
hrs = (( time >> 11) & OxIF) + 1;° 

Pee pits 11:15 *] 
days = ( time >> 16) & OxIF; 

/* bits 16:20 */ 
mons = ( time >> 21) & OxOF; 

/* bits 21:24 */ 
yrs = 1980 + ((time >> 25) & Ox7F); 

Zé bt tsy (25234 */ 


Printf("ST time Zlx is $d/$d/dd at fd:¢2d\n", 
time, mons, days, yrs, hrs, mins); 
Cconin();} 
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Mark Williams C 


Mark Williams has a C for the ST on the market. 
Many of you porting 1BM code wil! be very happy 
with = the latest ST C on the market. For 
UNIX-philes, there is a C-shell like interface with 
most of the familiar tools, 

Good news - The documentation is filled with 
interesting examples and explanations. The compiler 
is faster than Alcyon (not by much) and is a K&R 
with extensions (let's hear it for enums), and, so 
far, the least expensive of the serious C compilers 
on the market (approx. $140). There is an archived 
copy of the Microemacs source code in the 
distribution, A program is incjuded to convert 
Alcyon object files to MW objects. 

Bad news - This package is designed for either 
hard disk or two double sided disks. All the nice 
windowing calls are undocumented but MW recommends 
the Abacus GEM book. Almost as slow as the Alcyon 
compiler but it does compile and link when you 
'cc!, The resulting .PRGS are larger than MegaMax's 
ePRGs. 

While not a slick as Megamax, Mark Williams fs 
a better choice for C Programmers who cut their 
teeth on 1BM PCS or UNIX systems, A good quess fs 
that many of the Mark Williams Cs will be sold to 
those porting programs from |BMS. 

Note: If you buy MW C and have one single sided 
drive AND one double sided drive, please do the 
following, and DO NOT run the instal! program: 

1, Backup the disks. 

2. Copy the .PRG files from the second disk 

to a single sided disk. 
3. Copy the .A files (except for MicroEmacs 
archive) to the single sided disk. 
Now you can run and be almost as happy as someone 
with two double sided disks, 


NEXT MONTH 


The editor sent me a note to say that he had a 
copy of Lattice C for me to evaluate. What | plan 
to do is to have a comparison of Alcyon, Lattice, 
Mark Williams, and Megamax a fa Dr. Dobbs Journal. 


P.S. - The USENIX news billboard has an Atari 
St section that gets a surprising amount of good 
software donated to it. If you can get to a system 
with a news feed please check USENIX out. 
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The Joys of Modula-2/ST 


Just like a bad penny, | am back again. If you 
remember my last column, | showed you how to put a 
window on the screen. In this column, | will use 
that program as a module that will be IMPORTed, We 
will then manipulate that window on the screen, 
(For those who suggested opening it for a breath of 
tresh air away from my columns, | will not make any 
further comments). However, what we will do Is 
move the window around and even make the window 
larger and smaller. These are operations that you 
have been doing with windows since you got your 
Atari ST but now they will be under your control. 

This column will discuss EVENTS, The reason that 
events is capitalized, ts because of the importance 
of events to the whole GEM scheme. GEM was bullt 
up around events. In the old days, pre MacIntosh, 
a computer would only respond to a command that it 
was expecting, For example, if a letter choice was 
to be entered into the system, you could move the 
Joystick around all you wanted, and the computer 
would not recognize that movement. Things have 
changed however. With the ATARI ST, if the system 
Is expecting a letter and you move the mouse to the 
top of a screen and press a button, there is a good 
likelyhood that a menu choice will drop down and 
will take over the screen. You can do several 
things with the system whlle it is walting for the 
number. Events manipulation is what makes the ST a 
much more user friendly system than previous 
computers. 

Events on the ATARI ST are divided Into tive 
groups: keyboard events, mouse button events, 
mouse pointer events, messages, and timer events. 
Keyboard events occur whenever a key Is pressed. 


by Sol Guber 


The mouse button event monitors which of the 
buttons has been pressed and how many times each 
have been pressed, The mouse pointer watches the 
changes in the mouse's position on the screen. The 
message event is used to show that the user has 
made a request of the system like moving the window 
or changing Its size. These messages will be the 
major event that we will consider In this article. 
The timer events use one of the many timers in the 
system, 

The procedure to use for monitoring events is 
called Eventmultiple and contains the following 
Parameters, A usage Is shown in Figure 1. The names 
for the parameters are my own. The parameters, in 
order, are event types, click number, mouse button 
type, mouse button number, recil flag, reci x, recl 
y, rect w, recl h, rec2 flag, rec2 x, rec2 y, rec2 
h, rec2 w, messages, timer lo, timer hi, mouse x, 
mouse y, mouse button state, keyboard state, key 
pressed, and mouse button number. This Is quite a 
mouthful and EventMultiple is easily one of the 
most complicated commands available, This is the 
command to check on al! five types of events, and 
each of the event types can be monitored 
individually. The indi vidual functions are 
Eventkeyboard, for key presses, Eventbutton, for 
monitoring the mouse buttons, Eventmouse for 
watching the mouse, Eventmessage, for the 
predefined message, and Eventtimer for the system 
clock. In actuality, there is just one procedure 
and all of the others call EventMultiple. 

Now how does EventMultiple work? The first 
varlable that needs to be entered Is event types. 
There is a numerica! code for each of the five 
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MODULE Happening; 


FROM Window IMPORT InitWindow, CloseWindow, handle; 

FROM AESEvents IMPORT EventMessage; 

FROM AESWindows IMPORT WindowUpdate, WindowSet,WindowCalc,WindowGet; 

FROM GEMAESbase IMPORT WindowRedraw, WindowTopped, WindowClosed, 
WindowFulled, WindowSized, WindowMoved,WindowNewTop, 
WindowHorizSlided; 

FROM AESGraphics IMPORT GrafMouse; 

FROM GEMVDIbase IMPORT PxyArrayType; 

FROM SYSTEM IMPORT ADR; 


VAR 
xdesk, ydesk,wdesk,hdesk : INTEGER; 


PROCEDURE BigEvent(); 


VAR 
Msgbuff : ARRAY [0..8] OF INTEGER; 
mx,my,dummy : INTEGER; 
Fulled : BOOLEAN; 
xwork, ywork,wwork,hwork: INTEGER; 
xold,yold,wold,hold : INTEGER; 


BEGIN 
LOOP 
EventMessage (ADR(Msgbuff)); 
CASE (Msgbuff[0}) OF 
WindowRedraw 
WindowNewTop 
WindowTopped : WindowSet(handle,10,0,0,0,0); | 
WindowHorizSlided : 
WindowSet (handle, 8,Msgbuff[4],Msgbuff[5],Msgbuff[6], 
Msgbuff[7]); | 
WindowSized : 
WindowUpdate (1); 
WindowSet (handle,5,Msgbuff[4],Msgbuff[5],Msgbuff[6], 
Msgbuff[(7]); 
WindowGet (handle, 4,xwork, ywork, wwork, hwork) ; 
WindowUpdate (0) 7 | 
WindowMoved : 
WindowUpdate (1) ; 
IF (Msgbuff[6] < 60) THEN Msgbuff[6] := 60; END; 
IF (Msgbuff[7] < 80) THEN Msgbuff[7] := 80; END; 
WindowSet (handle,5,Msgbuff[4],Msgbuff[5],Msgbuff[6], 
Msgbuff[7]); 
WindowGet (handle, 4, xwork, ywork, wwork, hwork) ; 
WindowUpdate(0) ;| 
WindowFulled :. | 
WindowClosed. : CloseWindow; RETURN; | 
ELSE; 
END; 
END; 
CloseWindow(); 
END BigEvent; 


BEGIN 
GrafMouse(3,NIL); 
WindowGet (0,4,xdesk, ydesk, wdesk, hdesk) ; 
BigEvent(); 


END Happening. 
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types of events. The codes In hexadeciamal are: 
Keyboardevent = 01H, Buttonevent = 02H, MouselEvent 
= O4H, MouseZEvent = 08H, Messageevent = 10H, and 


Timerevent = 20H, If you want multiple events to 
be watched for, you just add up the sum of the 
constants. !f you want just the button and the 


messages to be monitored, event types equals 12H, 
This allows for the selective monitoring of the 
system. EventMultiple returns a number showing 
which of the events triggered the system, If 
events type was set equal to 12H and only a message 
event occurred then the 
10H. The returned value Is always a subset of the 
possible events. 

The next three variables have to do with the 
mouse and the buttons on the mouse. Click number 
is the number of times the mouse button has been 
pressed, Mouse button type tel!s which button Is 
being monitored with the left button being O1H, 
button from the left being 02H, and so 
The Mouse button state shows whether the 
up or down with 1 belng up and 0 being 


value returned would be 


second 
forth. 
button Is 
down, 

The next five parameters in EventMultiple are 
used to determine changes in mouse position. A 
rectangle on the screen is defined and the system 
watches whether the mouse pointer moves enters or 
exits this rectangle. A one ts used to signify 
enter and a zero is used for an event occuring when 
the mouse exits, The rectangle Is defined by the 
next four parameters. The next five parameters are 
used to define a second rectangle on the screen 
which can also be monitored. 

The next parameter in EventMultiple is the 
address where 16 messages from the system can be 
placed, Figure 5 shows a list of values used for 
the predefined messages that can be passed back to 
the program in Msgbuff{0] by the AES system. The 
rest of the Msgbuff will contain values pertinent 
to some of the messages. The only messages that we 
will be concerned about in this program is the 
messages about what is being down to the window, 
especially sizing It, moving it, fulling It, and 
closing tt. The menu selected message will be 
discussed in the next column. 

The next two parameters in EventMultiple are the 
value In milliseconds for the timer before it times 
an event. 
tow byte, high byte. 


out and signals The parameters are in 
standard format, The final 
six parameters return values from the event caller. 
Mouse x and Mouse y are the actual positions of the 
mouse when the event occured. The mouse button 
state, when the event occured is returned. The 
keyboard state tells whether shift, control, or the 
alternate keys are pressed. The key press is used 
for the actual value of the key that was pressed. 
Finally Mouse button counts how many times the 
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Mach 2 for the Atari ST 


Mach2: multi-tasking Forth-83 development system 


With everything you need to develop stand-alone appplications. 
including: integrated GEM editor, full GEM and TOS support, 
Motorola assembler, debugger, demos, and our 300 pg. manual. 


Mach 2 is interactive, so it allows you to experiment with 
the ST without going thru the compile-link-execute cycle. But 
when you do load in programs, look how we stack up: 


Fast Sieve Compile Link Execute | 
Mach 2Forth 0:00.2 0:00.0 3.92 | 
Megamax C 0:50 0:24 2370-7 
Mach 2* 0:00.2 0:00.0 1.41 
Megamax* 0:50 0:24 «1.41 | 


“Using built-in Motorola assembler 1 | 


(That's three times the execution speed of other Forth’s) 
Note the turnaround time. It simply takes less time to 
develop your programs or finished products with Mach 2. 


oad all for only 
Palo Alto Shipping $ 59 95* 
PO Box 7430 
Menlo Park, CA 94026 plus $5 S/H 
800/44-FORTH (Sales) CA Res add 6.5% 
415/854-2749 (Dev. Support) VISA/MC COD 
415/854-7994 


‘Original Macintosh version $99.95 
Amiga version $99.95 


“Price will be $99.95 as of Nov 1, 1986 EPROM systems available, too 
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ST ppplications 


For Vol. 1 (1985- 4 issues) of ST 
Applications the Support Disks contained 
both the text files for the articles as 
well as the programs we published. Public 
domain software and text files were added 
to fill up each monthly disk. 


For Vol. 2 (1986- 9 issues to date) of 
ST Applications the Support Disks contain 
only the programs and support files as 
well as a good helping of Public Domain 
software each month. Text files for the 
magazine articles are not included on 
the monthly disk, 


All 13 disks are available for $10 
each ($12 with copy of ST Applications). 
Please make checks payable to ST 
Applications, P.O. Box 980, Forestville, 
CA 95436 3 
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mouse button was actually pressed. 

Now that we have the heart of the program, the 
event manager the rest of the program becomes 
easily explained in several sentences. First, draw 
a window with the proper parts (last month's 
column), Check to see if an event occured. 
Determine which event occured. Perform the proper 
action, Repeat as needed. There is nothing to it. 
It is just the details right! That is Just what the 
program in Figure 2 does, 

As with all  Modula-2 programs, the first 
operation {ts to IMPORT the proper procedures for 
other areas, The program from last month must be 
redone so that there is a Definition Module 
containing the procedures Initwindow, Closewindow, 
and the variable handle, so that we know which 
window we are working on. 

A new procedure is used in this program called 
Windowupdate. It is used to signal GEM that a job 
with the window is being performed and that the 
user has taken over the screen. I+ has four 
possible parameter numbers. One signals that an 
update is being done and no other function with the 
window will be allowed like no menu will be 
dropped. Zero signals that the update Is finished 
and other operations can now be performed, The 
other values, 2 and 3, are seldom used. 

The major part of the program is the Procedure 
Bigevent. Since the program is to be kept small, 
only a selected few messages from the window wi! 
be examined, | will) not check for mouse or the 
keyboard events. Thus only the EventMessage 
procedure is needed to be called and it is much 
simpler than EventMultiple. 

Not all of the possible messages that can be sent 
to Msgbuffer will be tested. |! have listed all 
the possible ones in Figure 5, but many of the 
possible ones will be neglected. 1 will only write 
the code for four of the possible messages, the 
movement of the horizontal siide, the movement of 
the window, the change in size for the window, and 
closing the window, 

An endless LOOP is used to keep checking for the 
events until the CloseWindow message 1s returned 
and the program stops. The Modula-2 CASE structure 
Is used to check for each individual possibility. 
The form for the CASE is very similar to that of 
PASCAL except that the ELSE is used. The CASE form 
can be seen in the program. The CASE form Is used 
rather than using a number of IF THEN ELSIF since 
'+ makes for clearer programs. The first message 
checked is that for a change In the hort zontal 
slider. 1f that is the message, then the Windowset 
command fs used to change the position of the 
hort zontal slider. 

The next message that is checked Is that for a 
change In size of the window, If this message is 
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can be seen in the program. The CASE form is used 
rather than using a number of IF THEN ELSIF since 
it makes for clearer Programs, The first message 
checked is that for a change in the horizonta! 
slider. If that is the message, then the Windowset 
command is used to change the position of the 
horizontal slider. 


The next message that is checked is that for a 
change in size of the window. If this message is 
true, then the system is notified that a window 
update is in progress. The WindowSet command is 


variables of the size the 
those returned from Msgbuff. These are 

part of the current set and then the 
update is set to zero to show that it is 
you use this procedure, you will notice 
something strange on the screen. The inside 
portion of the window is not changed. I+ is the 
same as it was before the the window was changed in 
size. The programmer herself must make user that 
the proper information is put back into the window 
when the size has been changed. 

If the window was moved, check to make sure that 
the sides and height are still the Proper size. 
Then perform a Window set with the proper variables 
for the current  vatues, Finally perform a 
WindowSet with the Proper variables for working 
variables, 

If the Windowclosed message was sent then the 
window is closed and the The 
CloseWindow procedure is last 
month's column, 

The initialization statements for this program 
are also simple. First use Grafmouse to change the 
shape of the mouse to a pointing finger. Determine 
the size of the screen. Finally call BigEvent. 
This is an endless loop and does not complete until 
the close window command is clicked. 

| hope that you have enjoyed moving your window 
around on the screen. It is not very difficult. 
Next month, | will also the the event monitor to 
use the menu and make your own menu's. 


used to make the current 
same as 

then make 
window 
over. If 


program is over. 
the one used in 


More FORTH from page 31 


Promise of suiting somebody; whether it wil! agree 
with you all depends, Future topics | am considering 
Include a description of the BIOS, XBIOS and sound 
routines, Anyone wishing to Suggest further FORTH 
curlosities should address all correspondence to 
Albert Lew, 680 Blair Ave, Piedmont, CA, 94611. 
Until, then happy VDI ing! 
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Atari ST 
heats up with 
“Strip Poker. 


and more, (= 


Examine Artworx’ expanding list of ST software: 
STRIP POKER is the classic computer program. Play against Suzi and 
Melissa; the more you win, the more they take off! Only $39.95 

THAI BOXING brings oriental kick boxing to the ST with stunning 3-D 
Graphics and fast action. Only $19.95 

HOLE IN ONE GOLF plays like the real thing and includes an easy-to-use 
Editor for designing your own golf course. Only $29.95 

BRIDGE 4.0 has full graphic display of all hands, allows the user to be 
dealt good cards all the time and is completely mouse-driven. Only $29.95 
COMPUBRIDGE is Artworx’ bridge tutorial, utilizing 10 chapters covering 
all aspects of the game. Only $29.95 

PEGGAMMON is a new and innovative approach to backgammon. Play 
against the computer or with a friend in the two-player mode. Only $1795 
MAILLIST handles medium to large sized lists. It zip code sorts 
alphabetizes, selects by keyword, prints labels, and more. Only $1795 
BAKER STREET DETECTIVE brings you back to 1893 London with mysteries 
to solve just like Sherlock Holmes. Only $1295 
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Artworx Software Co, Inc, 1844 Pentield Road, Penfield, KY. 14526 (746) 385-6120 - (800) 828-6573 


/ Strip Poker 


AA Stealing Game of Chance 


Forth Programmers 


Are you tired of buying the latest drawing 
Program only to find out that it falls short of 
your expectations? 

‘Want to write your own CAD program, but 
don’t want to spend a month writting all of 
those basic but necessary routines? Then get a 


copy of 
FORTHCAD™ 


Included on the disk is a click-on application 
as well as a complete and fully commented 
source code listing (over 350 screens), written in 
4XFORTH* for all of the usual drawing tools, as 
well as 1 and 2 point perspective, full screen 
crosshairs and rubber arcs between points. 

For 520ST 2 single-sided disks $35.00. 

For 1040ST 1 double sided disk $33.00. 
Future updates $12.00 to registered owners. 
Send checks or money order to: 


FORTHWARE 


5360 126th St., Hawthorne, CA 90250 
For technical information or to order by 
phone: call (213) 643-7106 


*Trademark of The Dragon Group Inc. 
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LOGO LOG 


by Leonard Kaplan 


Wanna Buy Some Properties, Cheap? 
Or, A Unique LOGO Feature 


A quick note: this column will make much more 7ERALL 
sense to you {f you do the exercises as you read ?MAKE "MYLIST [LUCY DES! FRED ETHEL] 
the column. Usually any given example will depend ?2PPROP ITEM 1 :MYLIST "SEX "FEMALE 
upon something done In a previous example. I'll try ?2PPROP ITEM MYLIST "LASTNAME "ARNAZ 
to avoid making examples carry from month to month, ?PPROP ITEM 2 :MYLIST "SEX "MALE 
though, so as not to leave new readers out in the ?PPROP ITEM 2 :MYLIST "LASTNAME "ARNAZ 
cold. This month we're going to look at an unusual ?PPROP ITEM 3 :MYLIST "SEX "MALE 
feature of ST LOGO, one that the "usual" home ?PPROP ITEM :MYLIST "LASTNAME "MERTZ 
computer languages don't have. Over the next few ?PPROP {TEM 4 :MYLIST "SEX "FEMALE 
months, wetl{! use this feature as part of a basic ?PPROP ITEM MYLIST "LASTNAME "MERTZ 
inventory system. The system I'l! Implement here ? 
will be for a VERY small hobby shop, but the basic 
concepts could certainly be applied to other . Now, type [n the procedure ‘In LISTING 1. You 
applications. So feel free to use my code to help don't need to type in the comments (they follow the 
organize your record or tape collection, or your "3"), they're just there to help you understand the 
disk (tbrary (not that THAT needs to-be organized, code, Then, type: 
right?). Let me know what you come up with, maybe 
other readers would be interested. TSHOWFEMALES :MYLIST 

Objects tn LOGO can be assigned properties. A LUCY ARNAZ 
property ts exactly what {It sounds Iike - a ETHEL MERTZ 
characteristic of the object. ST LOGO allows the te 
programmer to go far beyond the usual! high-level 
language "properties" like "It's a table" (the Interesting, eh? You're probably thinking "Gee, 
object was DIMENSIONed), or "t+ must be a day of thts could be useful! Just last week, the owner of 
the week" (asstgning an enumerated value in a local computer store asked me to design an 
PASCAL). For example, type In the following (you Inventory system for htm!" Or, maybe you're not. 
ALWAYS have your system up while reading ST Anyway, here are the [mportant bul|lt-tn procedures 
APPLICATIONS, don't you?) - the computer's related to property management: 
responses are underlined: 


48 ST 4 pplications October 1986 


1) GPROP object-name property-name 

The GPROP procedure is used to output the value 
of a given object's property. The object can be a 
single object, as In the code for SHOWFEMALES, or 
it can be a list. If the object doesn't have the 
requested property, an empty list "[]" ts 
returned. 
2) PPROP object-name property-name property-vaiue 

The PPROP procedure is used to assign a property, 
and a value for the property, to an object. Again, 
this object can be a single object, as in the 
example above, or it can be a list. In the latter 
case, the list has the property, but the individual 
object does not: 


?PPROP "MYLIST "LISTTYPE "TVPEOP LE 
?2GPROP "MYLIST "LISTTYPE 

TVPEOP LE 

?GPROP ITEM 1 :MYLIST "LISTTYPE 
"] 

it 


3) PLIST object-name 
The PLIST procedure outputs the properties of an 
object: 


PLIST "MYLIST 

(LISTTYPE TVPEOPLE .APV [LUCY DESI FRED 
ETHEL] ) 

? 


4) REMPROP object-name property-name 
The REMPROP procedure removes the named property 
from an object: 


?REMPROP "MYLIST "LISTTYPE 
?2GPROP "MYLIST "LISTTYPE 
U} 


2 


There are two other property-related procedures 
in ST LOGO, but first, a brief explanation. 

Procedures may be put together tn groups called 
PACKAGEs. For example, to put the procedure 
SHOWFEMALES and another one called SHOWMALES (III 
leave that as an exercise for you to write, but 
you'i! need it to continue typing In the items in 
this article!) into a package called PROPERTYDEMOS, 
you type: 


?PACKAGE "PROPERTYDEMOS [SHOWFEMALES 
SHOWMALES ] 
? 


To put all of the {tems that aren't Packaged 
already Into a package called OTHER, type: 


?PKGALL "OTHER 
ts 


There are other package-related commands, but 
I'll save them for a future column. Continuing with 
the property procedures: 


5) GLIST property-name package-name/package-| Ist 

The GLIST procedure returns a list of the objects 
in the workspace or specified package(s) that have 
the requested property. For example: 


?GLIST "SEX "OTHER 

[ETHEL LUCY DES! FRED) 

?GLIST "FOO “OTHER 

1 

?PPROP ITEM 1 :MYLIST "CRAZY "YES 
2GLIST "CRAZY "OTHER 

[Lucy] 

i 


Note that GLIST doesn't give the value of the 
specified property, It just notes which objects 
have it. 


6) PPS property-name package-name/package-| Ist 

The PPS procedure displays the non-system 
properties of all objects tn the workspace or the 
specified package(s). For example: 


?PPS “OTHER 

ETHEL'S LASTNAME IS MERTZ 
ETHEL'S SEX ts FEMALE 
LUCY'S CRAZY IS YES 
LUCY'S LASTNAME 1S ARNAZ 
LUCY'S SEX is FEMALE 
DESI'S LASTNAME IS ARNAZ 
DESI'S SEX ts MALE 
FRED'S LASTNAME IS MERTZ 
FRED'S SEX 1S MALE 

ie 
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TO SHOWFEMALES :PERSONLIST ;PERSONLIST IS LIST OF FIRST NAMES 


LOCAL "MAXDO ;ONLY AVAILABLE IN SHOWFEMALES 


LOCAL "INDEX 
LOCAL "CURRITEM 


MAKE "MAXDO COUNT :PERSONLIST ;HOW MANY PEOPLE TO CHECK 


MAKE "INDEX 1 ;OBJECT LIST INDEX 


LABEL "SHOWFEMLOOP 


MAKE "CURRITEM ITEM :INDEX :PERSONLIST ;OBJECT TO EXAMINE PROPERTIES OF 


IF (GPROP :CURRITEM "SEX <> "FEMALE) 


[GO "NOTFEM] ;BYPASS IF NOT FEMALE 


TYPE :CURRITEM ;ELSE TYPE WOMAN'S FIRST NAME, 


TYPE CHAR 32 ;A SPACE, 


TYPE GPROP :CURRITEM "LASTNAME ;AND HER LAST NAME. 


TYPE CHAR 10 ;GO TO NEXT TEXT LINE 


LABEL "NOTFEM 


MAKE "INDEX : INDEX + 1 ;BUMP POINTER, 


IF (:INDEX <= :MAXDO) [GO "SHOWFEMLOOP] ;AND DO AGAIN IF NEED TO. 


END 


There's definitely potential in ST LOGO for mre 
than turtle graphics! 
A LOOK TO THE FUTURE 

Here [Is my idea of what the (upcoming) tiny 
Inventory system should be able to do: 


1) Create a stock file; 

2) Add new items into the file; 

3) Add and remove stock; 

4) Allow "sale" ttems; 

5) Let a customer buy items by using a shopping 
list of some kind (no bad joke intended there); 
and 

6) Print an Inventory list. 


Keep [In mind that this ts really just a first 
draft. | am considering expanding the system to 
allow "multiple-warehousing". This means that the 
store could have items stored in multiple locattons 


coummawet 
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(files). For example, there could be 20 
paintbrushes in WAREHOUSE! and 15 in WAREHOUSE2. 
Recently, a company here in upstate New York spent 
large amounts of cash adding this feature to an 
existing Inventory system - obviously, [t may not 
be a trivial thing to patch In. If designed in (or 
hooks put in) right from the start, though, it is a 
nice feature - have you ever been in a "catalog 
showroom" and had the cashier tel! you that the 
Item ts available at another store in the chain - 
without calling the other store? 

A call to my readers for some information. Is 
there any way to expand LOGO to have more than 
256KB of workspace? If you type in the NODES 
command, it won't come back with more than about 
63000 nodes - about 252KB. This fs on a 1040ST with 
just the contro! pane! installed. Would more 
workspace be useful? Or more stack space (this is 
another unknown)? You tel! me. 
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The Beginner’s Corner 


DESKTOP Setup: 


Question: Why be concerned about DESKTOP setup 
since everything will function pretty well no 
matter how you set It up? 

Answer: Some of us want to maximize productive 
time and don't like to "waste" time waiting for the 
computer to "catch up", 

Say, what? That's right! If you have to spend 
time moving windows around and waiting for programs 
to load from disk (more than once) then your 
computer [s running you Instead of vice versa. A 
striking example of this ts Print Master (Unison 
World), which can be excrutlatingly slow when 
floppy run, or quick-paced when Ramd!sk run. 

Everybody should have a certain setup they use. 
Some may have more than one, depending on what type 
of projects they're working. My standard setup Is 
designed to be aesthetically pleasing and fast, 
particularly for the type of work | do most 
(wordprocessing and printing). If you'd Iikea 
format that works pretty well, Install the 
following (else skip to something more 
stimulating): 

Before you start, set up your disk with an Auto 
folder containing JDISK.PRG and ROCPY.PRG (requires 
J-Disk from Cal Com Inc.), a folder named RDCPY 
(put STWriter with XYZZX.DAT in there for now), and 
CONTROL,ACC, If you've got other stuff on the disk 
tt may affect the outcome. 


NOTE: Your Inputs are underlined 
<click> means click the left mouse button 
<return> means press return key 
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by Tom Hawkins 


"My" setup: 


1. The tools - J-Disk (Cal Com Inc.), ST Writer 
(ATARI), GEM Desktop (part of the ST operating 
system). 


CONTROL PANEL 
pe iidd AM | 11/20/85 
a | 


2. The GEM Desktop settings: 


CHANGE 

Setting From To 

Desk: Cntrl Panel: White 777° «642 
Black 000 211 
Green 060 007 
Red 700 070 
Rabbit-turtle slider, move 
to far left, 
Upper left corner of panel 
<click> 

Flle: No change 

View: Show as text <click> 
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SET PREFERENCES 
Confirm Deletes: EECEE [Ho 
Confirm Copies: [item [No 


Set Screen Resolution! 


[iw] [Rediee] DE 


Options: Set Preferences: 
a. Confirm coptes NO <click> 
b. OK <click> 
Save desk top <click> 
Set Preferences: 
a. Set Screen Resolution MEDIUM 
b. OK <click> 


3. The DESKTOP: 


a. Put mouse arrow on "A" Floppy Disk ICON - 
<click click> (ff nothing happens try It again, 
only this time, stimulate attempting to squash an 
ant that ts trying to get out from under your 
fingertip). 
be Size window down just a little to eliminate the 
row of 2 numbers on far right (place arrow on lower 
right corner box of window, depress and hold left 
mouse button and "drag" edge of window left a 
little until [t looks like the unnecessary numbers 
"disappear" ). 
c. Drag the window (Intact) to right-most part of 
screen about 1 Inch from top edge and about 1/8th 
Inch from right side of blue fleld (place arrow on 
the "A:/" on top of window - depress and hold left 
mouse button and rol! mouse to right unt! window Is 
where you want It - then release the left mouse 
button). 
d. Trash ICON - drag to a point about 1 1/2 Inch 
left of the "A:/" window you just created and about 
3/4 of the way down from top of your screen. 
e. Eliminate "BY Floppy Disk ICON - put arrow on B 
Floppy Dtsk ICON <click>. Move mouse arrow to 
OPTIONS then Install Disk Drive...<click> Remove 
<click>. 
f, Install "D" Ramdisk - put arrow on TAN Floppy 
Disk ICON <click>. Go to OPTIONS and Install Disk 
Drivee.e<click>, 
Now: 
(1) Ht <esc> key and type a capital "Db" 

NOTE: If you hit <return>, start again at f 
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(2) DON'T hit <return> - this Is for you speed 
readers 
(3) Press once on "down" arrow (It's under the 
tupt arrow which Is between the "Insert" and "clr 
home" keys, right under the "Help™ and..... oh, 
good - you found It) then press <esc> 
(4) Type In "Ramdisk" 
(5) See note In (1) above 
(6) Place mouse arrow on Install <click> 
(7) Drag "D" Ramdisk ICON to immedtate right of 
"A" Floppy Disk ICON 
(8) Double-click on "D" Icon 
(9) Drag the window for "D:/" over next to "A" 
window so the tops are even and about 1/8 inch 
separates the two, This should about cover the 
trash |CON, but not quite ("TRASH" should stfll 
show) 
(10) Size the "D:/" window up so that about 1/2 of 
trash can shows. 
(11) Place arrow In "A:/" window (anywhere) and 
<click> 
(12) Place arrow on OPTIONS and Save Desktop 
<elick> 

And there you have It. It takes a little time 
and thought to set up the first time, but, once 
you've done It, the computer does al! the work from 
then on. It takes about 50 seconds from "power-on" 
to system "ready". 


RAMDISKS : 


There are a couple of commercial versions ! use, 
J-Disk (Cal Com Inc.) and M-Disk (MichTron). You 
can use any that works wel! for you. 

J-Disk is neat because on boot up it lets you 
set date and time and loads selected programs. 
Drawbacks to J-Disk Is that the Ramdisk It creates 
always seems to be named "D" and when stzed too 
smal! for the RDcopy contents, RDcopy will copy all 
the files (In name only) to the ramdisk truncating 
the files to the total ramdisk size making them 
useless, 

M-Disk is neat because [it lets you add as many 
Ramdisks as you have RAM for and desfgnates a new 
letter for each new Ramdisk you Install (ise. E, F, 
G, etc). | got up to "I" and quit (100K at a 
whack), Also, M-Disk can be Installed anytime - 
so, If you're chugging along just doing 
wordprocessing or something equally worthwhile and 
decide you want to play a game but aren't sure 
whfch one; create a 400K Ramdisk and load in Star 
Raiders and Joust or Time Bandits (DEMO), then you 
can call a game from Ramdisk and play until your 
kids start “coming down the hall, then you quickly 
switch back to the mundane task you were previously 


October 1986 


engaged in (don't forget to save your score) and 
your "image" as hard working slave to computer 
tasks is preserved. 

How do | use Ramdisks? Well, for starters | use 
J-Disk with 100K on Inftial boot-up to load 
STWriter, Procopy (PROCO Products), M-Disk, and 
assorted StWriter files for letter writing and 
business use, 

If | decide to get heavier into Projects like 
printing with Print Master (Unison World) or 
GAMES(7), I'11 add 400K with M-Disk and load 
everything | can into "C" Ramdisk. That gives me 
great flextbility to switch quickly back and forth 
as necessary. 

A very practical applicatton is to put 
frequently used terms, addresses, etc. into the 
same Ramdisk that STWriter [ts fn, then you can use 
"MERGE FILE" to Input them as necessary. For 
example, | have most software titles along with 
manufacturer's name and address In a file. When | 
MERGE and call up PM.SHT | get "Print Master 
(Unison World)", PM.LNG gets me "Print Master 
(Unison World, 2150 Shattuck Ave. Berkeley, CA 
94704)", and PM,ADD produces: 

Unison World 
2150 Shattuck Ave. 
Berkeley, CA 94704 

Saves in way of "look up" and "type In" ttme, 
You do need to take the time for initial set-up - 
and correct’ errors whenever you find them. 


Closing notes: 


In using ST Writer, you can access all tiles, 
The way to do it is to follow the "path". For 
exemple, ff I'm using "C" Ramdisk and decide | need 
a file from "A" disk, | need to know what file It's 
tos, FF i ist tt A: AUTO:STAP:CREDITS, which Is the 
CREDITS folaer in the STAP folder tn the AUTO 
folder on "A" drive, then when ST Writer asks what 
file to print to screen for tndex, type 
A:\AUTO\STAP\CREDITS. This wil! show you all files 
in the folder CREDITS. When you get the name of 
the file you need, press "L" for load, then 
A:\AUTO\STAP\CREDITS\ff le name, Once you've set up 
the path you can access the folder whenever you 
want - until! you change It. "C:" plus file name Is 
sooo much easier, that's why | load what | plan to 
use Into the same ramdisk folder as ST Writer. 
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we DUPLICATE 


VIRTUALLY ANY DISK 


i PROCOPY WORKS WITH ALL 


ST S/S & D/S FLOPPY DISK DRIVES 


WK PROTECTS AGAINST ACCIDENTAL LOSS 


OF EXPENSIVE SOFTWARE 


we NOT COPY PROTECTED 
He UPDATING POLICY: $10 W/RETURN 


SOFTWARE IS EASILY DAMAGED BY THE ELEMENTS 
AND HANDLING. YOU WANT TO BACK UP YOUR INVEST- 
MENT BUT COPY PROTECTION LOCKS YOU OUT! 


PROCOPY ts tHE Kev 
* * * * 


a ne 
SEND CHECK OR MONEY ORDER [Gi pees PLUS SHIPPING 
$2.00 NORTH AMERICA, OVERSEAS $4.50 
DEALER INQUIRIES WELCOME 


PROCO PRODUCTS 
P.O. BOX 665, CHEPACHET, R.1,,02814,U.S.A. 


TO ORDER CALL (800) 843-1223 on (401) 568-8459 


WORD FOR WORD” 


A crossword game for the ATARI ST! 


It's a challenging game in which 
players take turns creating words 
on a playing board. Scrabble 
players will love it! Here's what 
reviewers have to say: 


“...the whole game design is extremely user- 
friendly. ..a winner.” ANALOG COMPUTING. June 1986 


“.. It's easy to use the mouse to design and save 
your own board layout...makes the game even 
more fun.” ANTIC. April 1986 


“...1-am very impressed with Word for Word... full 
utilization of GEM...solid performance...a joy to 
play...attention to detail. ..excellent product.” 

ST APPLICATIONS, Jan-Feb 1986 


To Order 


Contact your Atari ST dealer. or 
send $39 95 plus $3.50 for 
shipping and handling. ($43.45) 
California residents add $2.40 
sales tax. ($45 85) 


Bay View Software 
177 Webster St.. Suite A-295 
Monterey, CA 93940 
(408) 373-4011 


MasterCard or Visa accepted 


Works with color (medium resolution) or monochrome monitor. 
Scrabble is a registered trademark of Selchow & Righter Co. 
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A FinalWord in the Hand 


Certain End Users have aired their fears that the 
ST is not being used for business purposes, but 
know that my wife and | have found the ST an 
invaluable tool as a word processor. When we bought 
our computer, we also bought The FinalWord because 
it seemed the only full-featured writing software 
avallable at the time. It remains so eight months 
after we took the plunge into the world of Atari. 

I'm not going to review Mark of the Unicorn's 
powerful word processor as much as make 
recommendations about its usefulness and how to get 
the most out of It. 1! have spent more than 250 
hours working with this program, and | wish | could 
say that all of my time was spent processing words. 
| can't. But if what I've learned is worth sharing, 
then the time was well spent. I'Il let you be the 
Judge. 

An Overview of The FinalWord 

The FinalWord is for serious, heavy-duty writing. 
We're talking contracts, books, proposals, form 
letters, thesis papers, etc. It Is priced and 
packaged for business use, both large and small. 
You can use It for simple letters and notes to 
friends, but It requires a certain amount of time 
setting up and shutting down, You certainly 
shouldn't buy it for such simple tasks. 

The version I'll be discussing (V1.17) has been 
reviewed by experts at ST Applications, Antic, and 
Analog, and not altogether favorably, All reviews 
acknowledged, the myriad features of FinalWord are 
worth Investigating. It is incredibly versatile 
with full formatting capabilities to produce any 
kind of document you could desire, except for 
double column printing. It does include indexing, 
contents numbering,  footnoting, headers = and 
multiple printer drivers and driver 
configuration program, lists, endnotes, keyboard 


footings, 
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by Donavan Vicha 


customization, and multiple-window editing. The 
keyboard commands are not always simple, but 
learning to use the editor Is made easy by an 
excellent tutorial. 

The reviewers! main criticisms of The FinalWord 
focus on the buffer management system and the 
Reference Manual's generic documentation. | agree 
they could be better. The sales copy reads: "You've 
got your hands on the only word processor ever 
written specifically for writers," That may well be 
true, but after many, many hours of experimentation 
and calls to MOTU's support staff, | can tell you 
that FinalWord wasn't written specifically for the 
ST. If you have a computer that Is equipped with 
the friendiiest graphics environment around, you 
would like to use that environment. The FinalWord 
doesn't, Only the four-page insert, which deals 
mainly with installing the programs, makes any 
mention of the ST. And that Installation process 
bypasses the GEM data files. 

1 had to doa lot of experimenting to find out 
how to carry out what | think of as the 
housekeeping chores: setting up the program, saving 
and retrieving files, opening new files, 
printing--that sort of thing. The Irony here is 
that housecleaning is carried out on the GEM 
desktop and the four-page ST insert gives no 
guidance in that direction, With the tutoria 
Instructing you to type "fw" or "b:test.doc", you 
can get awfully confused. 

| also agree with the critics that the buffer 
management system, the virtual memory/swap file 
set-up that makes the program crashproof, also 
causes some annoyances: a "Swapping" message and 
clearing of the screen if you aren't typing after 
ten seconds and limited momory for files in the 
default mode of the Recovery program, the program 
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that creates the Swap file where your text is 
stored in case of a crash, There is also the dual 
disk aspect of the program that almost makes having 
two SS drives or a DS drive a necessity, 

Since | had no choice but to learn how to master 
the software In order to get a freelance Job done, 
| have come to appreciate the strengths of The 
FinalWord and the fact that a word processor in the 
hand is worth more than those others still hiding 
in the bush, Here are some suggestions that have 
made using The FinalWord more tolerable for me. | 
can reservedly recommend FinalWord, high price and 
all, if you take these extra measures. 

Ram-Charging The FinalWord 

Using a ramdisk can real ly speed up any disk 
Intensive program and The FinalWord certainly fits 
that category. You can overcome some of the 
annoyances that go with using a copy-protected 
Program ("insert key disk') especially when using a 
single drive when two are really necessary. Install 
the C Ramdisk as whatever software you're using 
instructs, then put in your work disk, double 
click, and by holding the Shift key down, click on 
all the necessary files and copy them to the 
ramdisk. 

The next step of Installing applications (see 
Page 48 of your ST Owner's Manual for full detail Is) 
goes one file at a time for the .PRG filles of Disk 
1. You will install them as "TOS--takes 
Parameters™ files, which means they do not use the 
GEM features, Then Insert DIsk 2 In Drive A and 
copy the files not suffixed by .DOC (except for the 
one[s] you plan on using) and install the .PRG file 
same as the others, 

Using the ramdisk, you only have to go through 
the installation process once, then save the 
desktop and remember to transfer that Deskinf to 
the #1 disk, From then on, everything is 
automatically installed as "TOS--takes 
parameters," 

Now insert one of the original disks, open the 
window for Ramdisk C, double click FW.PRG, and you 
should be rolling, After the key disk copy 
protection sequence has been satistled, you should 
remove that disk and put in the work disk. If 
you've been using FinalWord without installing the 
PRG files (which is the four-page Insert's SOP for 
single disk drive users) or keeping the 
GEM.ACC files, you are in for a treat. Watch that 
cursor just fly when you hold down the keys! No 
real need for using the two-key CR commands, The 


next thing you'll! notice, or rather, not notice, is 
the "Swapping" line in the lower right corner of 
the window; It becomes much less of a bother than 


Previously. And so on down the line, saving a file 
and printing filles become 
smoother and faster. 
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Just remember that you will occasionally have +o 
save and copy your document to a real disk, or It 
will disappear with the rest of your ramdisk whee 
the computer ts shut off or accidentally crashes. 
Transfer Is quick and Painless, too, so you can 
make as many back-ups as gives you peace of mind. 

| confess that most of my experiments with this 
Program occurred before | started using the raméisk 
and that the crashproof capabilities saved a lot of 
text at times. Of course, | may not have had to do 
sO much experimenting had i had clearer 
documentation and had the buffer Management system 
been a bit friendlier, Now that | have greater 
contro! over all the power of The FinalWord, | 
think | know my priorities here, 
Other Tips and Tricks to The FinalWord 

To anyone interested In working on large 
Projects, | have a few more suggestions that should 
make lite with The FinalWord a little less 
adventurous and more productive. 
EXPANDING THE SWAP FILE: The Instructions for this 
manuever are covered on page 218 of the Reference 
Manual and work fine if you own an |BM. Since you 
don't, here's what MOTU staff told me, With the 
RECOVER.PRG installed as @b[T0S-takes parametersi, 
double click on same. Yout!1 get a window that asks 
for parameters. 
Type In: 


-create 96 


This gives you a Swap file of about 100K. You can 
go up to 248K in Increments of 8 Pages If you like, 
but then youtre really getting Into massive files 
and a ot of searching around during editing. The 
default setting, however, is just a mite tight, so 
give the 96-pager a try. You can batch files {+ 
your document runs longer than the 50 pages this 
will allow. 

lan Chadwick, in his Antic review, complained 
that ST Writer has larger file capacity than The 
FinalWord and itts true, but who wants to scan 
through a 100-page document onscreen? Better +> 
break things up into parts, which can be done by 
using the @@Include command that al lows merging of 
flles, This Is fairly well explained in +he 
Reference Manual. 

Another, more legitimate gripe that Chadwick 
ralsed is that whatever was onscreen the lest time 
you used the program reappears when you load the 
FW.PRG. Unless you wish to continue working om it, 
you have to delete the buffer. 1+ you had deen 
working with more than one buffer, you have => 
delete them; they're all in there Somewhere. If you 
don't, you could be facing a "Swap File Fell* 
message when you least expect or want it. (Note: 
This can be eliminated by changing the setaw!> 
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setting In the CONFIG.PRG, as can the Swap timing 
mechanism, If you have two drives, do it and don't 
bother with a ramiisk, MOTU assured me the manual 
covers this adequately with proper study.] 

Unless | am returning to work on a file or files, 
| usually don't copy the FW.SWP over to the 
ramdisk, It's a big file and takes a second or two 
to copy. It's faster just to run RECOVER.PRG and 
create a new Swap file as | just described. You 


start with a clean slate and save a millisecond 
along the way. 
PRINTING INDIVIDUAL PAGES FROM A FILE: It's 


happened to me: | Initiate printing and haven't got 
enough pages loaded in my printer. So, after 
loading more paper, | want to print the last five 
of twenty. The Reference Manual says this can be 
done (see page 321), but for the ST one tiny little 
command has been left out. When you tap F7 for 
Advanced Print Options, it tells you you type In 
"N-page ##." Close, but no banana. You must type 
‘eprint -page ##." These small things shouldn't be 
worth a phone call to Cambridge, Mass. But there 
YOU go. 

CONCLUSION: It would seem that setting upa 
ramdisk just adds to the ordeal of setting up The 
FinatWord, but the gains In speed of moving the 
cursor, ease of file management within and on the 
desktop, and speed and ease of saving and printing 
a file are worth it. Paying for a ramdisk rather 
than a second disk drive Is certalnly worth It. 

By summerts end, we've been promised word 
processors that were designed specifically for the 
ST, and maybe, specifically for writers, too. It's 
a matter of taste as far as which one Is for you, 
but It's also a matter of what you get used to 
using. I've put a lot of time Into The FinalWord 
and now | feel it was worth It. | can wait for the 
other word processors to come out, the reviews to 
come in, the bugs to be shaken out, and maybe even 
a price war or two during the Christmas season. 
Needless to say, I'm writing this long-winded 
review and plenty of other long-winded documents 
with The FlnalWord now that I've mastered its 
less-than friendly buffer management system. (1 
hope [t's clear that actually writing and editing 
with The FinalWord ts much easier to master and, In 
its way, fun.) 

| just wonder why Mark of the Unicorn has let The 
FinalWord lay around without attempting to enhance 
it. No thesaurus or spelling checker? No attempts 
to follow the Desktop Publishing trend with mutiple 
fonts and graphics? The company seems to have 
squandered their lead over other software companies 
offering more state-of-the-art word processors for 
less money. Those who have paid the hefty price 
for The FinalWord deserve some effort toward 
Improving the product. As things stand, it Is a 


56 ST, pplications 


worthy plece of software, but the last word in word 
processing has yet to be written. 

A Powerful Configuration Program and a Multitude of 
Printer Drivers 

The FinalWord did not come with a printer driver 
for my SG-10 printer and | found both the Reference 
Manual for The FinatWord and the SG-10 very 
intimidating. The staff at MOTU was very helpful in 
this matter and sent a _ checklist of the 
modifications necessary to convert their built-in 
Epson driver to drive the SG-10. Most of the 28 
items on the checklist didn't need to be changed 
and the operation was fairly easy. 

The Configuration program for The FinalWord is 
the largest .PRG file on either disk. It allows you 
to customize just about any aspect of Its vartous 
programs to whatever parameters you would like. It 
begins with a main menu of four options: 

1) Select terminal type, 
2) Setect printer type, 

3) Advanced configuration, 
4) Exit. 

There are nearly 50 printer drivers listed for 
The FinalWord and probably more available from 
MOTU, The Advanced Configuration menu provides a 
way” to modify an existing driver to the specs of 
your own printer. The menu items are listed in the 
Reference Manual so that you can study thelr 
meanings and adapt them to what your printer manual 
specl fles. The menu is fairly detailed in 
explaining what each option to be changed does. 

There are other items on the Advanced 


Configuration menu as well: 
1) Define terminal types, 
2) Define printer types, 
3) Define Input/Output ports, 
4) Select default editor parameters, 
5) Select default formatter parameters, 
6) Define keyboard uses, 
7) Return to main menu. 

This 1s wonderful, albeit complicated, stuff here 
and probably from the items \isted you can guess 
what can be done. For Instance, if you are going to 
use The FinalWord for typing up contracts, the 
default formatting options can set things up so 
that you needn't use the @Style commands as heavi ly 
as would be needed in the default mode currently 
set, Ditto for the editing routines. [Note: There 
is an option for printing while editing that 
requires a BIOS call 15, LISTST, to work properly. 
lf the ST does have this, MOTU has left out an 


Important option and sales feature for The 
FinalWord.] 
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The Define keyboard option carries this menu of 
options: 

1) Enable Function keys, 

2) Bind one key to another, 

3) Bind keys to actions, 

4) Define ranges of keys, 

5) Display key to action bindings, 

6) Display action to key bindings, 

7) Read key definitions from file, 

8) Write key definitions to file, and 
9) Return to submenu, 


| am certain a true power user would find these 
options terrific, or at least understandable--me, 
it's still Greek, but I'm easily impressed by 


things 1! don't understand, The details of each of 
these menus are described In the Reference Manual 
in the Installation section, 

Perhaps if there Is enough Interest in advanced 
uses of The FinalWord from ST Applications readers, 
| can be persuaded to continue experimenting with 
these features. Otherwise, I've found that | can 
Process words to my heart's content with what I've 
already presented in this seemingly neverending 
article, 


ST applications 


‘THE ATARI 520/1000ST JOURNAL 


For Vol. 1 (1985- 4 issues) of ST 
Applications the Support Disks contained 

both the text files for the articles as 

well as the programs we published. Public 
domain software and text files were added 
to fill up each monthly disk. 


For Vol. 2 (1986- 9 issues to date) of 
ST Applications the Support Disks contain 
only the programs and support files as 
well as a good helping of Public Domain 
software each month. Text files for the 
magazine articles are not included on 

the monthly disk. 


All 13 disks are available for $10 
each ($12 with copy of ST Applications). 
Please make checks payable to ST 
Applications, P.O. Box 980, Forestville, 
CA 95436 
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It’s Here! 


BASIC 
“ye COMPILER 


sO For Atari 520/1040 ST 

° So easy to use! 

e A menu driven GEM application! 

fieST BASIG.compatible| 

aeNiclon code! 
*stan@.alone program! 

ngWOISYS calls! 

> 


Double-precision fl 
fully implemented 


on the market today send 
personal check (wait 10 days to ship). money order 
cashiers check, VISA and MIC. C.O.D. (add $2.00). (California 
residents add applicable sales tax.) 
Dealers Welcome 


Logical Design Works, Inc. 
780 Montague Expwy., Suite 205 
San Jose, California 95131 

(408) 435-1445 


Telex: 294526 LDW UR 
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The Review Board 


Currently FORTRAN compilers for the ST are 
avai lable from three different sources: TD!, Pecan, 
and Prospero. Both the TDI and Pecan compilers are 
based on the USCD p-system; in fact, according to 
TDI they are the same compiler. The Pecan version 
is reviewed here. Neither It nor Prospero's FORTRAN 
1s perfect, but both are useful products, 


P-system FORTRAN 


PEAS sottware Systems, Inc. 
1410 - 39th Street 
Brooklyn, New York 11218 


Pecan's FORTRAN is a product that has had a 
longer lifetime than the Atari ST. This is possible 
because of the UCSD p-system. The p-system Is a 
virtual machine that can be implemented on many 
different computers. The p-system has been around 
since the late 1970's and was designed to support 
Pascal, In a multi-tasking environment. Most people 
who have used the p-system are either fanatical 
about it or don't like it at all. When using the 
p-system, be prepared to forget the desktop ever 
existed; you won't see it, icons, or menu bars 
anywhere In the p-system. In fact, there Is a small 
Program to remove the AES from memory if you still 
use a disk booted system. 

Although this is a review of a FORTRAN compl ler, 
| think It Is necessary to review the p-system user 
interface, as well as the compiler Itself. If you 
have used the p-system on other computers, it won't 
be necessary to learn anything new. The p-system 
looks the same on every system It runs on. Also be 
Prepared for a little surprise, Since the p-system 
Is so efficient with memory, if has plenty to 
spare, and formats the spare memory into a ramisk. 
This also causes an irritating problem: the 
P-system is continually swapping segments of code 
In and out of ‘the disk drives, slowing the system 
down. Personally, | would rather have a smaller or 
non-existant ramdisk and an Increase In speed. 
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The p-system is a _ thoroughly integrated 
environment, along the same tines as the Turbo 
Pascal environment on the 1BM PC. This means that 
It Is possible to go from an error in a compilation 
to the proper tine in the source code to correct 
it. Unlike Turbo Pascal, it is not possible to run 
p-system programs outside the p-system environment. 
In this way, it ts similar to BASIC: there Is a 
long bootup process before any Program can be run, 

Like some Forth Interpreters, the p-system has a 
disk structure that is completely different from 
the normal structure for the Atari. This Is done in 
the name of a standard file structure among 
Pp-systems on different computers, While it is 
Possible to transport files in and out of the 
p-system, this is only possible through a special 
utility, There are two sorts of disks, or 
"volumes," as the p-system calls them. A TOS volume 
resides in a file on an ordinary disk. Native 
volumes take a whole disk and are slightly faster. 
A directory cannot be gotten from the desktop on a 
native disk, because the disk and GEM have 
absolutely nothing in common. 

The p-system editor is anachronistic, Five years 
ago It may have been acceptable. But in the age of 
windows, it is difficult to believe that anyone 
could be happy with it. Using this editor is not at 
all Intuitive. | would not recommend using it 
without studying the manual rather thoroughly, 
Since the p-system is separate from all other 
software, it Is impossible to bring in a new editor 
from outside. With a little experience, the editor 
can be quite usable, but | wil! never be quite 
happy with it. 

Everything about the p-system seems to be 
awkward. As an example: to get a directory of a 
volume, the filer must be invoked, the filer must 
be loaded from disk, a disk name given, and the 
filer quitted to return to the main menu. With all 
the disk accessing and typing that must be done, it 
can get quite tiresome. 

The manuals recommend a two drive system. The 
P-system is very disk Intensive -- | think fhat a 
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very large ramdisk or a hard disk would be more 
helpful, The p-system also seems to have some 
problems with running from a TOS volume 
occasionally while swapping to disk it gets lost 
and must be rebooted. This does not happen with 
native volumes, but if a hard disk was used, this 
could be a problem. 

A large amount of documentation was shipped with 
this system; however, quantity does not necessarily 
imply quality. It took me a week to figure out how 
to use a native disk, The majority of the 
documentation is orlented towards the |BM PC and 
the Pascal compiler, The graphics section has 
absolutely nothing to do with the Atari. Some 
documentation for the graphics was later sent to me 
on disk. 

Graphics under the p-system are relatively 
primitive. The VDI and AES routines are completely 
unsupported, What is supported are turtle graphics. 
Turtle graphics can do quite a bit, but they do 
have limits. 

The ANS! standard for FORTRAN 77 is really two 
standards: the minimal implementation, and the fult 
implementation. The p-system FORTRAN is a minimal 
implementation. There are a few minor variations 
from the standard, but they really don't matter. 
The extentions include a statement to include a 
source file in a compilation or include code froma 
library. Minimal in this case is not a bad thing: 
the only thing 1 missed in this compiler was the 
string concatenation operator ("//"). 


Prospero FORTRAN 


= > 
Prospero Software 
FT AXGU GES FOR MICROCOMPL TEE PROELSSION ES 

It strikes me that | don't have nearly as much to 


say about this compiler. Prospero's FORTRAN Is 
similar to a conventional mainframe FORTRAN system. 


It comes on a single disk that contains 
configuration programs , library maintenance 
programs, the GST linker, and, of course, the 
compiler. The first thing | noticed was that they 
provided no editor -- no big deal, but slightly 
surprising, The system also requires an Installed 
run-time library; this can help keep the program 
files short, but it can also be a nuisance, 

The Prospero compiier is a full Implementation of 


the ANSI standard. A_ full GEM Ilbrary patterned 
after the C Ilbrary is also Included. This setup 
works very well and lives up to Prospero'ts claims 
about serious business software. 

Although | have done no thorough benchmarking, 
Prospero FORTRAN produces code much smaller and 
somewhat more efficient than Lattice C, the only 
compiler |! have with whtch to compare it. With 


floating point numbers, it Is over four times as 
fast. 

There are a few problems with Prospero FORTRAN, 
however. 1 have found a few bugs, the majority of 
which are in the GEM |!brary. Prospero has spoken 
to me and claimed that they have completely tested 
it and found no problems, | have recently sent a 
letter to them detailing the errors | have found. | 
think that the problems may stem from a recent 
discovery that British ST's (Prospero is British) 
are slightly different from the American variety. 
This has caused one other company, at least, a 
little discomfort. | will try to keep everyone up 
to date on this problem and its resolution, through 
my regular column. 

There may be one other problem with Prospero: the 
run-time library. This little piece of software 
must be run once to install itself on a computer. 
{t+ contains all of the necessary functions left out 
of every program to make it smaller. If saleable 
programs are going to be written in FORTRAN on this 
machine, the run-time library must go along. It is 
not mentioned in any of the licensing agreements, 
so by Implication it is Illegal to distribute it. 
am trying to find out what exactly Prospero 
intended. Once again, |! will keep you Informed 
about any changes as | find out about them, 


Conclusions 

1 can't say elther product is perfect. | think 
both have a good purpose. Prospero's compiler Is 
quite usable even with its small problems. | think 
it is more adequate than Pecan's, for business and 
commercial applications. Pecan's FORTRAN, on the 
other hand, would be perfect for someone trying to 
learn FORTRAN in an integerated environment. The 
only thing standing in its way is the p-system, 
which can be learned with a couple of weeks of 
concentration. 


by Mark Lovell 


ES 


Leader Board 


Access Software Inc. 
2561 S. 1560 W. 

Woods Cross, Utah 84087 
(801) 298-9077 

($39.95) 


Being an avid golfer, | was very interested when 
1 heard that there several golf simulations that 
were coming out for the ST. Particularly, | was 
very happy to hear that Leader Board would be out. 


Ty 


\pplications 


October 1986 39 


| had seen It on the Commodore 64 and told the 
store owner that | wanted a copy when it came in 
for the ST. Well, it is here and it is even better 
than the version | had seen before. 

The program is different from many golf 
simulators In that you view the course from behind 
the golfer instead of from above. Also, the 
graphics are superb, To a degree you have a sense 
of depth, which allows you to decide on which club 
to use rather than just depending on the distances. 
There Is even animation Involved in the swing, so 
that you can see the entire shot. it even has the 
little touches that make a good program enjoyable. 
These touches Include the golfer looking up after 
the swing, so he can see where the shot went. 

The program allows you to choose the level of 
difficulty, the course to play and how many holes 
to play. These combinations will permit you to play 
up to four consecutive rounds on four different 
courses with up to four different players at any of 
three levels of difficulty. The nice thing is the 
abllity to mix and match these choices so that 
people of different skill levels can play a round 
together and be competitive. in addition to these 
choices, Access Software has announced that they 
will be producing additional courses for use with 
the program. These courses will come four to a disk 
at a price of $19.95. Unfortunately, none of the 
courses I've seen so far are designed to simulate 
any of the great courses of the worid and the 
Program doesn't allow you to design your own 
courses. 

The program does allow you to choose which club 
to use and the manual that comes with It gives you 
some Idea of the minimum and maximum distances each 
club will send the ball, But even that is not 
certain, because at the amateur and professional 
difficulty levels, the ball will hook or slice If 
you dontt hit it properly. Also, at the 
professional level, you have to allow for the wind. 
In addition to all of that, you still have to 
contend with shots not traveling as far when you 
are hitting out of the rough or a sand trap. In 
this regard Leader Board presents you with all the 
decisions that you have to make ona real golt 
course. It even includes the need to "read" the 
break when you are putting. 

There are some things that are not true to life 
In Leader Board. First, if you hit into water, you 
have to hit from where you started, but you are not 
charged a penalty stroke, In real life, you can 
drop a ball where your first one crossed the edge 
of the water, but you must count an extra stroke as 
a penalty. Secondly, the putting is unrealistic In 
terms of the number of long putts that you will 
make, In real life, even a pro won't make very many 
30 foot putts. In this simulation, you'l! probably 
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make three or four in each 18 holes. Also, the 
short shots that you need to make around the green 
and out of sand traps are very unpredictable 
compared to real life, but then on the golf course 
most things are unpredictable. 

When starting Leader Board most Input Is through 
the keyboard, but once you actually start to play 
everything Is done with the mouse. There are 
keyboard commands to skip holes, go to the "driving 
range" for practice or even to start over. On the 
course, you use the mouse to select which club to 
hit, to start and end the swing and to Indicate 
that you want to go on to the next shot. One area 
that caused me some problems at first was to 
remember to change clubs between shots. On the tee 
you will always have the driver Im your hands, even 
if the hole is very short. If you don't change 
clubs, ! will guarantee that you'l! have an 
interesting shot coming back, Other than the 
automatic selection of the driver on the tee, the 
only club that Is automatic Is the putter. Once you 
have changed clubs, the club in your hands will 
stay the same until you change it or get within 64 
feet of the hole, Once you get that close, you will 
be putting. 

The program Is copy protected, but does allow you 
to make back-ups. This Is done by using a security 
key. The key Is a plug that fits Into the second 
Joystick port. If this plug Is not there, the copy 
of the program will not run. Unfortunately, | know 
that the first few packages recel ved locally had 
some problems with the security key not fitting 
tightly enough, so the program did not recognize it 
was there. Also, | found that with my oldest ST the 
keyboard would not respond when the security key is 
In place. | did not have a problem with my other 
computer, but on the old one | could not type with 
the key in place, although the mouse did work. | 
have been unable to determine If the problem Is a 
defect in the computer or a some change that may 
have been made in the hardware since my first ST 
was manufactured. 

Overall, |! am very impressed with this program. 
The simulation is very accurate In most respects. 
The different courses provide enough variety and 
difficulty to keep things Interesting. The majority 
of what | have listed as problems | find are minor, 
but things that would be nice if they were changed 
or added. | have also seen people who are not 
interested. tn golf pick up this program and end up 
"golf nuts", | recommend Leader Board to anyone who 
enjoys simulations, 1! think you'll find this one 
both Interesting and a challenge. In fact, a local 
computer store is considering holding a Leader 
Board tournament with gift certificates for prizes. 
Pardon me while | go practice. 


Review by Greg Varley 
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PERSONAL MONEY MANAGER 


Michtron, Inc. 
576 S, Telegraph 
Pontiac, MI 48053 
($49.95) 


"Personal Money Manager" is an accounting system 
which uses standard double-entry bookkeeping to 
record income and expenses, It also allows 
comparisons of actual and budgeted figures and wil! 
print reports. 

The functions of the program for saving 
information are; Account Maintenance, through 
which you set up your annual budget in up to 999 
income or expense accounts; Enter Transactions, 
whitch records income and expenses against the 
budgeted accounts in checkbook-style format; Ledger 
Query, which lets you review or change 
transactions; and Automatic Posting, which allows 
you to create multiple automatic transactions, such 
as dividing a paycheck into several expense 
accounts. The reports the program generates re: 
Annual Budget, which prints a mon th-by-month 
spreadsheet of the income and expense items; 
Expense Ledger, which prints a month-by-month 
spreadsheet for all income and expense transactions 
for the year; Account Summary, which prints a list 
of all the accounts with each account's current 
balance and year-to-date budget; Monthly Detall, 
which prints a list of all transactions by account 
during the month; and Single Account, which prints 
the transactions for the month for a_ single 
account. 

"Personal Money Manager" Is very easy to use and 
requires little reference to the manual, which is 
very short, after the first read-through, it ts 
designed to save data automatically into the 
varlous files it uses. However, you must be sure to 
ask to save the data or it will be lost when you 
quit. 

The program stores records Into separate monthly 
files. Most of the reports generated will only 
print for the current month, as well, To change to 
a different month, you must use the Change Date 
function (or Job, as It's called). Be sure to save 
your data before using Change Date. The program 
reminds you by asking If you want to save data when 
you quit the Enter Transactions, Ledger Query, or 
Change Date jobs, 

Reports are printed directly to the printer. They 
cannot be looked at on the screen first. | condder 
this a drawback as | really don't want to go 
through printing copies on paper of all the reports 
just to find the one | want when | can't remember 
what they look like. A print-to-screen cholce would 
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enhance the value of the program tremendously. 

To start using "Personal Money Manager," the 
budget accounts must be set up from the Account 
Maintenance job. If you try to enter a transaction 
to an account you don't have, you must cancel the 
transaction, return to Account Maintenance, and add 
the budget account before going on. 

There Is no quick way to repeat the same amount 
in each month of the budget account. The program 
will repeat the previous account's amount In the 
corresponding month of the new account, This made 
no sense to me and | found it tedious to have to 
enter the same figures In each month while setting 
up my budget accounts. 

The program uses the mouse only for the pull-down 
menus, The rest of the cursor movement commands are 
keyboard entry only. The HELP key will cycle 
through all of the allowed responses, such as 
account number or account type, which is useful. 
The lack of "mouse-abi lity" In editing is a major 
flaw to me. I've seen recent ads which claim the 
program will also print checks, but this feature 
was not avallable on the version | reviewed. | 
don't find check-printing a necessary or desirable 
feature anyway, especially for home use. 

All in all, "Personal Money Manager" does what It 
says {St will do. It Is also very simple to learn 
and use. | did not find it as useful for my needs 
as a checkbook program would be. It also doesn't do 
enough to be as useful to a business, even a smal! 
business, as a spreadsheet or general ledger 
program. It can only help you see where your money 
is going. If that is what you need, then "Personal 
Money Manager," particularly considering Its 
simplicity and price, is a good program. 


Reviewed by Mary Varley 


Mu I+ 1-FORTH 

from Creative Solutions, Inc. 
4701 Randolph Road, Suite 12 
Rockville, MD 20852 
(301) 984-0262 


Multi-FORTH Is fit for almost everyone. Almost 
every feature that gives other ST Forths thelr 
special appeal can be found on a file contained on 
one of the two Multi-FORTH disks. Everything. The 
turnkey fee, of course, {ts fncluded In the system, 
and there are no upgrades. As | have said, 
everything ts there. Except for a little skimping 
on the documentation, nothing seems to be missing. 
| have only one major hang up with Multi-FORTH, and 
that ts Its $150 price. For $150, you do not get a 
Forth that is worth $50 more than Level 1 4x FORTH, 
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and definitely not worth $100 more than Forthmacs 
or Mach 2, Aside from the price, there are many 
reasons to recommend Multi-FORTH. 

From AES to XBI0S, Mult{i-FORTH has all the ST 
features covered, This includes dosound support, a 
multt level decompiler, local variables, and both a 
block and stream file editor. Although Multi-FORTH 
was developed with stream files, a block editor Is 
provided to help port programs from both 4x FORTH 
and the now defunct H&D Forth. | have absolutely no 
complaints with the Multi-FORTH stream file editor, 
which Is MicroEmacs. | don't particulary like the 
verston of MicroEmacs suppifed with Mult {!-FORTH 
(which {s the same MicroEmacs that 4x FORTH users 
use), but then again, there are no better text 
editors, The block editor ts the best ST block 
editor yet, although It falls quite short of 
MicroEmacs in both power and flexibfi lity. 

Both VDI and AES are fully supported, and a 
window handler {s provided to ease the task of 
creating and manipulating windows. Despite the 
complete implementation of AES, Multi-FORTH does 
not allow the user to create his own resource 
files, which means that customized dialog boxes and 
menu bars cannot really be accessed untf! verston 
1.1. As with Mach 2, Multi-FORTH provides a 
vaporous explanation of VDI and AES. If you don't 
know what they are, the Multi-FORTH manual is going 
to be of no help. 

There are three features of Mult{-FORTH that 
merit particular distinctton. Although these 
features have been implemented In other Forths, 
Mu{ti-FORTH Is the only Forth that provides al! 
three, The first feature Is the decomptier. A 
decompiler enables the user see how code was 
produced and greatly simpliftes the task of 
Programming. Local varfables, explained in the Mach 
2 review, are also part of Multi-FORTH. This makes 
programming math Intensive applications far easter. 
The final feature of Multi-FORTH does not quite 
work, but is fun and interesting In Its own way. 
With the word "RUN," the user can load up programs 
from efther the ramdrive or the floppy and EXECUTE 
THEM! This means that you can load up a terminal 
program on top of Multi-FORTH, play Megarolds 
during tf you are bored, or even load up ST Writer 
and jot down a poem. This feature was once 
implemented on Forthmacs, but It did not work very 
well with a good number of programs. Although the 
Multi-FORTH "RUN" commands works better than the 
verston Forthmacs had, Multi-FORTH still cannot 
MRUN' Neo, the bouncing ball, or other programs, 
Desptte the fact that Neo and the bouncing bal! can 
be double clicked from medium res and work, 
Mult{-FORTH cannot seem to run them. This fs a 
minor griping point, as the sheer abl lity to load 
programs on top of Multi-FORTH Is Impressive 
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enough. 

The weakest link of the strong Mult1-FORTH 
system Is Its documentation. The three ring 
Multi-FORTH binder lacks documentation for the 
demos, files that enhance the Multi-FORTH program, 
and the ST internals supported by Multi-FORTH, 
Despite {ts shortcomings, the documentation serves 
as an excellent Forth Introduction and tutorial. 
The Mult!-FORTH manual also provides excellent 
reasons for programming In Forth that every Forth 
programmer should know. The graphics are cheerful 
and unintimidating, as is the style of writing, 
which should satisfy everyone from the novice to 
the most hardened Forth addict. 

Programming In Mult{-FORTH very enjoyable, and 
Is an expertence to behold. Every‘thing that you 
know how to do can be done. There Is no excuse not 
to exploit your potential to its fullest with this 
Forth system. The editor is wonderful, debugging is 
a snap with the decompiler, and the Forth Itself 
leaves nothing to be desired other than a IIttle 
more zip. Multi-FORTH Is by no means a slouch, but 
it cannot keep up with 4x FORTH or Mach 2 either. 
Sure, there are some bugs In the demos and the 
"RUN" feature will not run programs correctly 
sometimes, but Multi-FORTH has very few bugs In the 
system Itself. The manual contains even fewer 
mistakes, with the most apparent being the two 
periods after "Rockville, Md" on the cover, The 
reason for this state of near perfection Is the 
error bounty; Creative Solutions, which makes 
Multi-FORTH, will pay 50 cents for every typo you 
find, and $5,00 for every software error you find, 
Provided you find it first. The bugs that | have 
found have in most likelihood already been 
reported, and wil! be fixed with revision 1.1. With 
an Increase In speed and a price drop to $50, 
MultI-FORTH verston 1.1 could stage a coup on the 
rest of the ST Forth systems. But as It Is, 
Multt-FORTH still costs $150, and all you can get 
ts a minutely flawed, powerful version 1.0. 

RE 
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Mach 2: Flying at high quality speed. 
Palo Alto Shipping 
P.O. Box 7430 
Mento Park, CA 94026 
(415) 854-2749 


Without question, Mach 2 ts a winner. It ts 
sleek, fast, and loaded with all the latest high 
tech gadgets. Even the operator's gutde invokes 
visions of elegant, htgh speed operation. But Mach 
2 ts not a fighter plane; it ts a "Forth 
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Development System for the Atari/ST" produced by 
the Palo Alto Shipping Company. Like all high 
performance machines, Mach 2 has to make some 
compromises, but when the disadvantages are weighed 
against the advantages, it is clear that Mach 2 
Presents a fresh vision in the Atart ST Forth 
world. 

My favorite part of the entire system is the 
documentation. Mach 2's documentation does the best 
job of all the ST Forths tn Presenting a manual 
that is very understandable to both beginners and 
experts alike. Many topics | have not yet covered 
in A Step Forth are explained concisely and clearly 
with the help of excellent dtagrams and pictures. 
Like every ST Forth save Forthmacs, Mach 2's 
documentation was produced using a Macintosh, but 
interestingly enough, the typeface used with the 
Mach 2 manual ts far easier to read than that ot 
the other manuals, although the pitch size appears 
to be about the same. The glossary is perfect for 
the beginner because it prectsely defines what each 
word does and how to use it. For expertenced hands, 
the format of listing one word per page in the 
glossary will make word lookup tar easter. The one 
shortcoming of the documentation fs that tt makes 
only a passing reference at GEM. Windows are 
covered at length, but without much reference to 
the ST's window handler, AES. On most Forths, this 
would be acceptable, but because Mach 2 describes 
everything else from the ground up, | see no reason 
not to include a discussion of fulling exploiting 
the ST hardware as well. 

Of course, all links to ST hardware within the 
Program itself are there. GEM in all its glory ts 
supported, as well as all the BIOS and XBIOS 
commands. Basically, this means that you can 
manipulate MIDI, the serial port, windows, VDI 
primitives, sound, and other ST features to their 
full potential. Many good examples are Provided on 
the Mach 2 disk to show how to fully exploit 
certain features of the Mach 2 Forth system. The 
system itself is run under GEM, and as | found out, 
that is both an advantage and a disadvantage. With 
the other ST Forths, loading files for editing 
falls just short of being intuitive. With Mach 2; 
however, files can be loaded by moving the mouse up 
to the "File" word on the menu bar and clicking the 
appropriate selections, Using GEM also allows the 
user to utilize any desk accessories at his 
disposal. With the other Forths, learning a new 
Forth techinque via Compuserve and then immediately 
switching to the Forth program to try it out would 
be impossible. Of course, it is child's play with 
Mach 2, Interestingly enough, Mach 2 doesn't seem 
to Jose any speed as a result of running under GEM, 
!f anything, it is in the same league as version 3 
of 4x Forth (the speed champion), and a good deal 


STA plications 


faster than the other ST Forths | have seen. 

The main disadvantage of running Mach 2 under a 
GEM environment is the editor. Personally, after 
having used MicroEmacs to edit Programs for 4x 
Forth, Forthmacs, and Multi-Forth, | found the Mach 
2 editor to be both underpowered and slow. Since 
Mach 2 does use stream files, however, this problem 
can be overcome by leaving Forth and loading up 
MicroEmacs. Of course, this method loses the 
immediacy between editing and execution that is one 
of the main strengths of any Forth programming 
environment, but | felt that | simply could not 
live with the Mach 2 editor. After talking to the 
people at the Palo Alto Shipping Company, however, 
| learned that many people have voiced similar 
complaints and a revamped editor is already in the 
works. The other picky point about a GEM-based 
Forth is the cursor. In Mach 2, the cursor is an 
underline (™™"), which does not work properly all 
the time and is much harder to spot than the normal 
blinking rectangle. It is very annoying to type in 
a line of text in Mach 2 only to have the bottom 
scan line of the text come out as garbage. Despite 
these shortcomings, it is definitely refreshing to 
have GEM when running the Forth and more of a help 
than a hinderance. 

A splendid feature of Mach 2 is its ability to 
handle local variables, Loca! variables make math 
in Forth far easier to use, and are my next 
favorite feature in Forth next to the decompt ler. 
With local variables, math is performed more along 
the lines of traditional languages, Instead of with 
the stack, The stack method is fine for People who 
are accustomed to it, but for those whose are 
tami liar with algebra, and not Forth, local 
variables are more natural than the stack. 

Despite my many criticisms of Mach 2,0) ste 
love it. It lacks many of the disk access features 
of Multi-FORTH and Forthmacs, and the dictionary is 
one of the smallest I've seen; 4x Forth dwarfs it. 
Mach 2 takes up about 300K of memory, which is a 
little too much for a 512K system. The techinal 
description of how Mach 2 works will not satisfy 
many, but the whole Forth is written in assembly, 
which should allow those who are really interested 
to figure out exactly what goes on behind the 
scenes, Without question, Mach 2 is the system | 
would recommend most to users who are not familiar 
with Forth and want to learn it painlessly or users 
already know Forth and want to painlessly 
manipulate windows, For the Forth and ST hardware 
sophisticate, | would dispense one tepid warning 
about Mach 2 before recommending it. Mach 2's 
weakest link is its editor, but if Palo Alto 
Shipping Company has its way, the new Mach 2 editor 
will quiet all the complaints. Local variable 
support, a decompiler, GEM environment, speed, and 
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no distribution tee -- Mach 2 would be a great deal 
even if it cost $200. Amazingly, a $59 check to the 
Palo Alto Shipping Company, P.0, Box 7430, Menlo 
Park, CA, 94026, is all that stands between you and 
Mach 2. (CA residents add 6.5% sales tax.) Any 
sales inquiries can be made to 800-44FORTH, *#*** 

by Albert Lew 


Business Statistics 
Experimental Statistics 
Forecasting and Time-Sertes 
Sales and Market Forecasting 
($145 Each) 


Lionheart 

P.0, Box 379 
Alburg, VT 05440 
(514) 933-4918 


To bridge the transition between the game 
machine concept for the ATARI and the business 
machine, strong analytical programs are needed. 
Lionheart Is known In the MS-DOS and Apple world 
for having "heavy duty" numerical analysts programs 
that use minimal graphics, These four programs are 
the first that have been translated onto the ATARI 
format. In general, they are usable, fast, 
rellable programs that fulfill a very specific 
need. They work well and easily. There Is good 
support from the author, | can recommend them with 
no qualmse 

Let me generally explain the good points of the 
programs. First, they are quite fast. Performing 
the calculations takes seconds, rather than minutes 
lf they were uncomp!led. The data is generated and 
stored as ASCII data files, which make them easy to 
be read by word processors and changed and 
modified, The data can be accepted by VIP 
Protesstona! to be used by Its graphics package. 
VIP Professional can also generate the data. There 
are many, many checks and data modifications 
allowed, The programs are well debugged. 

Each package comes with both an instruction book 
on how to use the statistics as well as how and 
what each Individual program does. The books 
include many examples and Illustrations. They are 
useful for brushing up on your knowledge or 
approaching the subject for the first t!me. 

The disks are not copy protected and there Is 
even short snippets of BASIC code given to show how 
to enter data to the various programs. 

The programs are discreet. They allow you to 
enter the data elther froma disk file or from the 
keyboard with the opportunity to save to disk. The 
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printer Is supported and the majority of the data 
that {s calculated can be sent to be printer for a 
hard copy. 

There are a few areas in which | would have 
liked to see some Improvements. These programs are 
written In BASIC and ported over from an MS-DOS 
system and then compited. There are little error 
trapping that explains what was done wrong. An 
error throws you back to the GEM tabletop, Since 
It fs a compiled BASIC, some of the timing loops 
are too fast to read all of the messages that might 
be generated. There are no real graphics 
capabi !ittes In any of these programs. The 
programs leave much to be desfred in terms of user 
frtendliness as shown by other programs for the 
Atart ST. There Is no GEM, no mouse, and no 
colors. 

As with all the packages, there fs an excellent 
manual supplied with the programs. The 
experimental statistics book explains many subjects 
including the topics of uncertalnities, samp | ing 
distributions, the application of the norma! 
distrtbution, hypothesis testing, significance 
levels and the calculation of Type |! and Type | 
errors, the analysis of variance, linear and 
multttinear regresston. The book is over 250 pages 
and there are 44 programs assoclated with the 
package. 

Some of the programs in the expertmenta! 
statistics package perform the following 
operations. DIST calculates the probabilities for 
normal, chi-square, +, and F test, so that tables 
are no longer needed. GRAPH plots up to three sets 
of data together, HYPOTEST contains hypothesis 
tests for comparison of means and variances. MREG 
calculates multilinear regressions with up to nine 
Independent variables. MVREG performs multivartate 
regression with an infinite number of variables. 
ORTHOREG uses orthogonal polynomtals t*up to the 
sixth order. TABULATE cross tabulates 
correlations, contingency analysis, and the 
analysts of frequencies of response. There are 
three programs for analysis for one-way, two-way, 
and three way factorfal analysis of variance. 

There are programs to perform the analysis of 
vartance for Latin Squares, Graeco-Latin, and 
Youden square analysis. There are programs for the 
analysis of varfance and regression to first 2-, 
3-, and 4- dimensional orthogonal response 
surfaces. SMOOTH and SORT manipulate the data. 
There ts even a program to generate random 
telephone numbers. 

The business statistics set manual shows how 
character!ze performance by comparison to means 
vartances. it shows how to use quality control 
methods for product reliability. There are 
chapters on parametric and non-parametric 
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significance testing. Finally there are several 
chapters on how to design business experiments, 
There are 42 programs assoclated with this 
package. 

There are some overlapping in the programs with 
the Experimental statistics package. Such programs 
include DIST, HYPOTEST, MREG, MVREG, SMOOTH, SORT, 
and TABULATE. There are also additional programs 
CONTINGE is used to generate RxC contingency 
tables. SAMPLE shows how to perform stratified 
sampiing, cluster sampling, sequential, same, 
binomial and hypergeometric schemes, PERIOD 
analyizes the perlodicity of seasonal and cyclic 
time serfes, TREND removes such vartattons. 
MAVFCAST and EXPFCAST performs forecasting by 
moving average and exponentia! smoothing 
techniques, AUTOREG performs the autoregression 
analysis of a time series. 

The Forecasting and Time Series package contains 
a 150+ page manual which explains the methodology 
of analyzing time series of data. The methods 
include correlation, autocorrelation, and spectrum 
analysis using Fast Fourfer transforms. The 
forecasting methods Include moving average, 
exponential smoothing, regresston, and Box-Jenkins 
ARIMA type models. To help In the understanding of 
these methods, examples are given and fully 
explained, The data on the disk includes Dow-Jones 
utilities Index Information as well as other real 
data to help fearn how to use the programs. There 
are 27 programs with this package. 

The programs again contain a slight amount of 
overlap with GRAPH, MREG, and PERIOD found in the 
experiemental statistics package. The other 
programs Include FFT for Fast Fourter transforms 
for spectrum analysis, TRANSREG which calculates 
relationships between two time series Into terms of 
a transfer function. Three programs MAVFCAST, 
EXPFCAST, BJKCAST which forecast by either moving 
averages, single or double exponential! smoothing or 
three parameter Box-Jenkins techniques. ARIMA uses 
an advanced Box-Jenkins technique. 

Sates and Market Forecasting |s a companion 
program to the other forecasting programs. The 
manual fs 150+ pages and the emphasis [Is more on 
marketing forecasting, The manual shows how to 
adjust data for Inflation and population as well as 
seasonal! characteristics. It shows how to discover 
trends and cycles, It evens explains how to get 
the necessary data to use for correlations. There 
are 32 programs with this package. 

This package has the most overlap. All the 
programs from the Forecasting and Times series 
package are Included. The new programs include 
LREG which fits one time series up to three other 
lagged time serfes, ADSERIES and NORMILIACR are 
utility programs that allow for the addition and 
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subtraction of series as well as the multip|ication 
and diviston of one series by another. An 
addittonal series of data files are included to 
help In learning how to use this package. 

The pricing of the four packages shows the 
overlap involved [n the programs. Bustness 
Statistics and Expertmental statistics each list 
for $145, The combination package for these two Is 
$200. The Forecasting and Sales and Marketing 
Packages are $145 and $150 respectively. The 
combination package is also $200, The difference 
tn cost Is partially due to the programs, but an 
additional manual is also supplied. 

What Its the bottom line on these packages? They 
are expensive comprehensive programs. The manuals 
are used to explain the underlying principles of 
all of the programs and succeed very well. The 
manuals are well written, but they assume some 
knowledge of statistics. These programs are 
designed for no nonsense statistical analysis. 

They run wel! and produce correct answers. They 
will take a bit of study In order to use well. For 
the number of programs that each package gives, and 
the amount of usage that each wil! receive, these 
Programs are a good solid value. They fil! a niche 
and should be purchased by any one that needs good 
statistical packages. 

lf 1 ever go back to teaching Engineering, | 
will certainly use these programs as examples. 

Reviewed by Sol Guber 
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Chicago, IL 60647 Denver, CO 80210 West Valley City, UT 84119 Torrance, CA 90505 
(312) 235-9629 (308) 777-8080 (801) 321-6708 (213) 325-4754 

Hobby Town * Rocky Mountain Atari Svc. Digital World * Cal Com Inc. 

Lincoln, NB 68505 Boulder, CO 80301 West Valley City, UT 84120 Buena Park, CA 90620 
(402) 464-2858 (800) 662-8274 (801) 966-6148 (714) 523-5353 

* Software Center International Computer Link * ZCMI, Cache Valley * Mid-Cities Comp-Soft 
Metairie, LA 70002 Boulder, CO 80302 Logan, UT 84321 Bellflower, CA 90706 
(504) 885-2000 (808): 4a4;7800 (801) 750-7510 (218) 867-0626 


Sly 
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Personal Computers, Etc. 
Canoga Park, CA 91303 
(818) 883-5421 


ComSoft 
Reseda, CA 91335 
(818) 768-5017 


* Atcom Micro Center 
Thousand Oaks, CA 91362 
(805) 497-1220 


* Warner Engineering 
San Diego, CA 92110 
(619) 294-4024 


DiskBelief 
San Diego, CA 92123 
(619) 565-1078 


Pro-Data 
San Diego, CA 92154 
(619) 423-3442 


* Nova-Electronics & Software 
Riverside, CA 92501 
(714) 781-7332 


Learning Tree Computer Center 


Santa Ana, CA 92705 
(714) 667-1575 


* Consumer Electronic Store 
Anaheim, CA 92805 
(714) 635-8621 


* Paradise Computer Systems 
San Luis Obispo, CA 93401 
(805) 544-7127 


Information Systems Unltd 
Santa Maria, CA 93454 
(805) 922-4545 


Alpha Comp. & Fin. Svc. 
Lancaster, CA 93534 
(805) 942-2626 


* Ridgecrest Computer Ctr. 
Ridgecrest, CA 93555 
(619) 375-4364 


Computer Literacy Bookshop 
Sunnyvale, CA 94086 
(408) 730-9955 


Fry's Electronics 
Sunnyvale, CA 94086 
(408) 733-1770 


* Access to Software 
San Francisco, CA 94118 
(415) 751-2231 


3E Software & Systems 
Hayward, CA 94541 
(415) 537-3637 


Home Computers 
San Leandro, CA 94578 
(415) 278-8881 


ECX Computer Company 
Walnut Creek, CA 94596 
(415) 944-9277 


* Microworld 
Berkeley, CA 94703 
(415) 841-9179 


* Winners Circle 
Berkeley, CA 94704 
(415) 845-4814 


* Software 1st 
San Rafael, CA 94901 
(415) 459-1475 


* B&C Computervisions 
Santa Clara, CA 95051 
(408) 749-1003 


* San Jose Computer 
San Jose, CA 95125 
(408) 723-2025 


* Empire Computers 
Santa Rosa, CA 95401 
(707) 526-4106 


* Software Ist 
Santa Rosa, CA 95401 
(707) 576-0972 


Sawyer’s News, Inc. 
Santa Rosa, GA 95404 
(707) 542-1311 


* Computertime 
Citrus Heights, CA 95610 
(916) 969-4111 


Omni Computers 
Chico, CA 95926 
(916) 893-3458 


Computronics 
Honolulu, HI 96819 
(808) 836-0273 


High Tech Toys 
Beaverton, OR. 97005 
(503) 646-3950 


* IB Computers 
Portland, OR 97225 
(503) 297-8425 
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Univ. of Oregon Bookstore 
Eugene, OR 97401 
(503) 686-4331 ext. 54 


* Computer Palace 
Eugene, OR 97402 
(503) 683-5361 


Sunshine Computer Center 
Medford, OR 97501 
(503) 773-3608 


Serious Software 
Grants Pass, OR 97526 
(503) 479-9516 


Butler’s Computer Service 
Federal Way, WA 98003 
(206) 941-9096 


* The Computer Cache 


Anchorage, AK 99501 
(907) 272-9941 


SThop 


* Xanth Computer Systems Inc. 
Seattle, WA 98104 
(206) 624-9292 


Computer Palace 
Kenai, AK 99611 
(907) 283-9088 


We are also distributed by: 


** Midwest *** 
Computer Software Services 
Elk Grove Village, IL 60007 
(800) 422-4912 


*' Rocky Mtns & Plains *** 
Horizon Computers 

Denver, CO 80210 

(303) 777-8080 


** Los Angeles Area *** 
Levity Distributors 
No. Hollywood, CA 91601 
(818) 506-7958 
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We currently have over 300 retail 
outlets. One hundred thirty are ours 
directly with the remainder serviced 
through our three distributors. 

This listing of our retail dealers 
is provided as a service to both our 
dealers and readers. Dealers are 
listed in zip code order. If you do 
not find your store listed here please 
drop us a line identifying your 
distributor and we will gladly add you 


to our list. 


Should you not be able to find 
ST Applications at your local ST dealer 
Please drop us a line and we'll send 
them a sample copy. 

Our only products are ST Applications 
and the monthly Support Disk. 
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AA-AUG ST Sig 
c/o Jay Mcarthy (714) 829-8722 
Upland, CA 


AACE ST Sig 

c/o David Mann (512) 346-4940 
7108 Spurlock Dr. 

Austin, TX 78731 


ABACUS ST Sig 
c/o Warren Lorente (415) 453-3665 
San Francisco, CA 


Atari Computer Enthusiasts of 
Columbus ACEC ST Sig 

P.O. Box 30049 

Gahanna, OH 43230 
Lawrence Mendel, Pres. 


Adelaide Atari Computer Club 
Norman Pearce, Pub. Rel. Officer 
P.O. Box 333 

Norwood, S.A. 5067 Australia 


Atari Central Users Group 

c/o John Buckner (602) 881-0539 
2429 N. Richey Blvd. 

Tucson, AZ 85716 


Atari Computer Owners of Rochester 
Kathy Scoville (716) 334-5820 

P.O. Box 855 

Fairport, NY 14450 


Atari Elite 
c/o Stephen Kotula (412) 653-1641 
P.O. Box 58 

Library, PA 15129 


Atari ST UG of the Palm Beaches 
BBS (305) 793-9385 
(300baud, 10pm-Gam) 


Austin ACE ST Sig 

c/o Dave Mann (512) 346-4940 
8207 Briarwood Lane 

Austin, TX 78758 


ST User Groups 


B.A.S.LC. ST Sig 

c/o Pete Fazio (718) 646-6384 
2724 E. 28rd Street 

Brooklyn, NY 11235 


Blue Mtns Homebrew Computer Club 
Eric Lindsay, Editor 

6 Hillcrest Avenue 

Faulconbridge NSW 2776 

Australia 


BRACE ST Sig 
Tom Tjarnberg 
P.O. Box 6341 
Bellevue, WA 98008 


Cin’ tari, Inc. ST Sig 

Neil Reitz (513) 574-8622 
P.O. Box 14959 
Cincinnati, OH 45214 


COAST Users Group 

Chuck Thorpe (415) 945-1949 
1015 Esther Drive 

Pleasant Hill, CA 94523 


Desert GEMs 
Ridgecrest, CA 
(619) 375-4364. 


FASTER 

Andre Lafreniere, Librarian 
1161 Des Fauvettes 
Boucherville, Quebec 
Canada J4B 6A8 


FEAST Far East Atari ST 
Dale Ellis 

P.O. Box 7075 

APO San Francisco, CA 96328 


Greater New Haven ST UG 

c/o Robert Fischer (203) 288-9599 
80 Kildeer Road 

Hamden, CT 06517 
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HASTE Houston Atari ST Enth. 
c/o Patrick Mahoney 

622 Cherrybark 

Houston, TX 77079 


High Sierra Atari Users’ Group 
c/o Gene Manson (702) 356-6252 
P.O. Box 2152 

Sparks, NV 89432 


Indy ST Computer Club 

c/o Jim Wallace (317) 898-9856 
Box 2525 

Indianapolis, IN 46206 


J-BUG Jackintosh Boston UG 
Alan Glick (617) 296-8286 
One Center Plaza 

Boston, Massachusetts 02108 


LAACE (Los Angeles ACE) ST Sig 
c/o Kent Simon (818) 349-7540 
P.O. Box 7752 

Van Nuys, CA 91409 


Lea Valley Atari Users Group 
Matt Tydeman, VP & Editor 
125 Cadmore Lane 

WALTHAM CROSS 
Hertfordshire EN8 9JH England 


MACE Michigan ACE ST Sig 
c/o Fred Kandah (313) 665-8982 
536 Elm St 

Ann Arbor, MI 48104 


Pittsburgh Atari Computer 
Enthusiasts (PACE) ST Sig 
¢/o John Babson 

P.O. Box 18435 

Pittsburgh, PA 15243 


Portland Atari Club (PAC) ST Sig. 
P.O. Box 1692 
Beaverton, OR 97005 


Rocky Mountain Atari Advanced UG 
¢/o Myron Drapal, treasurer 

313 W Lucerne Dr. 

Lafayette, CO 80026 


San Leandro Computer Club ST Sig 
Bob Barton (415) 352-8118. 

P.O. Box 1525 

San Leandro, CA 94577-0152 


Seattle Puget Sound ACE ST Sig 
c/o Dave Showalter (206) 824-5141 
P.O. Box 100576 

Tacoma, WA 98411 


ST Ace 

c/o Mark Taylor 

2173 W. Steele Ln. 
Santa Rosa, CA 95401 


STACK (ST Atari Computers Korea) 
c/o Robert Mann 
A Co 102d MI Bn 
APO San Francisco, CA 96224-0373 


STAG (ST Atari Group) 
c/o John Huston 

6320 Keeler Street. 

Huber Heights, OH 45424 


ST Atari Road Runners 

c/o Robert Hueffman (203) 421-3864 
48 Winding Rd. 

Madison, CT 06443 


STING -ST INterest Group 
8461 Plaza Blvd. 
Minneaplois, Minn. 55432 
612-786-8181 


ST National Users Group (STNUG) 
3650 Sand Court 

Mims, FL 32754 

BBS (305) 383-1413. 


STORK ST Owners Representing Kadena 
c/o Barry C. Watson 

PSC #2 Box 14928 

APO San Francisco, CA 96367 


ST SOTA (State of the Art) UG 
c/o Jeff Rigby (813) 922-6244 
3949 Sawyer Rd. 

Sarasota, FL 33583 


STUGof Winnipeg 

c/o Len Stokes 

227 Kenaston Blvd. 

Winnipeg, Manitoba, Canada R3N 1V5 


STUN (ST Users Network) 

c/o Dave Johnson (801) 964-0771 
4308 S. 4625 W 

West Valley City, UT 84120 


Tampa Bay ST Users Group 
c/o Future Electronics 

St. Petersburg, FL 

(813) 527-7543 


Toronto Atari Federation ST Sig 
c/o Jon Manol 

Mailbox 1527 

5647 Yonge Street 

Willowdale, Ont M2M 4E9 Canada 


ST Bulletin Boards Update 


Here we present upda 
best of our know 


To the 
of 12 Sep 1986) 


Name 


tes to our list of ST BBS's published last month. 


ledge the information in this list is accurate. 
However, we take no responsibility for their existence or operation. (as 


State Number Notes 


STUG BBS -s:sene 


Starnet (Illiana ACE) 
Line #3 
Line #4 
Line #5 


Atari Base 
Atari Base 
Atari Base 
STATE. « © «© «© « 


* indicates that we've 


first time you attempt to log on to a new board. 


70 


~Can 


204 
217 
408 
408 
408 
707 


633-3066 
267-3530 
745-2642 
745-4758 
745-5664 
585-2194 


IL 
CA 
CA 
CA 
CA 


ST Atari UG, Winnipeg 
FoReM, 
Atari Corp.,HD 
Atari Corp.,HD 
Atari Corp.,HD 
ST Applications 


20Meg 


logged on. All boards listed are 300/1200 baud. 
Due to the intermittant nature of some BBS's, as well as inaccuracies 
of dialing please be courteous and listen to the ring & answer for the 
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New Software Etcetera 


The following listing includes both last month's errors in pricing 
and new products we've found out about. 


Absoft Corp Mad Sclentist Software 
4268 N. Woodward 2063 Ne 820 We 

Royal Oak, MI 48072 Pleasant Grove, UT 84062 
(313) 549-7111 (801) 785-3028 


AC/Fortran ($195) from MAC files can easily be Cardiac Arrest ($69) is an adventure game for 


ported to the ST. ANS! 77 standard & IEEE floating anyone who wants to play doctor. 
points. 


Mark Willtams Company 
Access Software 1430 West Wrightwood Avenue 
2561 South 1560 West Chicago, IIltnots 60614 
Woods Cross, UT 84087 (312) 472-6659 
(801) 298-9077 
* Mark William's C ($179.95) Is a powerful, well 
* Leader Board ($39.95) Is computer golf with recelved 'C! compiler. 
excellent graphics, 
* Tournament Disk #1 offers 4 more courses and 
Improved graphics. Master Designer Software 
Tenth Frame fs a computer bowling simulation due 5743 Corsa Avenue, Sulte 215 
out by Xmas. Westlake Village, CA 91361 
(818) 889-1537 


Cosmi Cinemaware distributed by Mindscape, Is 2 
415 Ne Figueroa Street collection of Interactive movies with arcade 
Wilmington, CA 90744 sequences, 
(213) 835-9687 SDI (Strategic Defense Intttative) with 25 
screens, ts best with joystick (October 15th). 
* Super Huey ($39.95) is a helicopter flight Defender of the Grown (as seen on the Amiga) wil! 
simulator. be out In January '87, 
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Megasoft 
P.O. Box 1080 


Battle Ground, WA 98604 
(206) 687-7176 


* A-Copter ($39.95) disk copy program 
A-Filer/Report Writer ($59.95) 
A-Maller ($49.95) 

Graphic Label maker ST ($39.95) 
Ram Disk and Spooler ($39.95) 

ST Tools ($39.95) 
Telecommunications Package ($39.95) 


Metacomco, Ince 

5353 #E Scott's Valley Drive 
Scott's Valley, CA 95066 
(408) 438-7201 


Cambridge LISP ($199.95) -An Interpreter/ 
compiler providing a complete LISP development 
environment. 

* lattice C ($149.95) [s a full K&R Implementation 
C compatible with Lattice compilers on the 1BM PC 
etc. 

* Macro Assembler (79.95) Professional quality 
development system with Standard M68000 mnemonics. 
* MCC Pascal ($99.95) Fast 1SO/ANSI standard 
compt ler producing native 68000 code. 

BCPL ($149.95) -Full standard BCPL compt ler 
combIning the convenience of high level language 
with assembler flexibility. 

Metacomco MAKE ($69.95) - A UNIX acompatible MAKE 
utility with extended functions. 

* Menu+ ($29.95) -Powerful menu generator Including 
batch mode, HISTORY, creation of tools, arguments 4 
options, organization of working files, programs 
etc. Included with each Metacomco language. 


Progressive Computer Applications, Inc. 
2002 Mccaullfte Drive 

Rockville, MD 20851 

(301) 340-8398 


* Graphic Artist Ver 1.5 ($199.95) is a combination 
of Computer Alded Design (CAD), business graphics, 
free-hand drawing, and typesetting programs in one 
package. Supports dot-matrix, color-, and 
laser-printers, 

* Font Editor ($79.95), from the Graphic Artist 
package. 
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Soft lab 

168 N 100 E 

St. George, UT 84770 
(801) 628-5400 


* OSCAR ($39.95) GEM-based hard disk backup uttlity 
which archives larger than 720k files to single 
disk. Also features file & directory restore. 


Startrontks 

P.O. Box 8185 
Turnersville, NJ 08012 
(516) 884-3196 


* Font Writer Plus ($39.95) adds muitiple font 
printing and picture integration capabilities to 
your favorite ST word processor (fe, ST Writer, 
First Word, etc.). Works with your Epson compatible 
printers (including laser printers) to create 
distinctive newsletters and reports. 


Supra Corp. 

1133 Commercial way 
Albany, OR 97321 
(503) 967-9075 


* 10 Meg. Harddisk ($549) 
* 20 Meg. Harddisk ($799) 
30 & 60 Meg Harddisks ($995 & $1995) are 
scheduled shortly. 
* Microstuffer ($69.95) ts a 64k printer buffer. 
* Omega Terminal ($29.95) 
* Supra 300ST Modem ($59.95) includes Omega Term. 
Hard Disk Backup This unit should be avail. in 
Dec and will backup 20meg per tape. 


Timeworks, Ince 

444 Lake Cook Road 
Deerfield, IL 60015 
(312) 948-9200 


Word Writer ST with Spel! Checker ($89.95) 
Data Manager ST with Report Writer ($89.95) 
Swiftcale ST with Sideways ($89.95) 
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It's the ‘‘Bible’’ of the industry, 
over 300 pages crammed with 
information, 1¥2"’ thick, over 2 Ibs. 
of fascinating reading. It’s yours 


for just $19.95. 
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It's a dictionary of software, over 
11,000 software titles, and filled 
with computers, accessories and 
other electronic products. It’s 
yours for just $19.95 


Be your neighborhoods bulletin board for just $19.95. You will not only have what is available but a preview of the 
many products coming up that haven't reached your local store yet. In addition you'll have the retail price of each 
item. Illustrations show some of the information crammed pages. MAKE YOUR CHECK OUT TO CSS and mail to 

address listed at bottom. Add $2 for postage & handling. For quick service call our number and ask for Karen. 


ATARI AL 520.87 


EBaderundSeftuare 


FTL Games 


rs fel 


ATARI JK s20-st 


r = 
Ce 
Sie 


COMPUTER SOFTWARE & ACCESSORIES 


LOCATOR SERVICE: 

CSS is a distributor that sells nation wide to 
stores in your area. If you can’t locate any of 
the items advertised in ST APPLICATIONS at 
your local dealer, call Karen at 1-800-422-4912 
and we will tell you where you can buy it. 
Become the best informed person in your area. 


ATARI J software 


LOGIC 


New from Timeworks 


ATARI 520ST SOFTWARE 
PUTS ALL THAT POWER TO WORK 


ATARI AL. s20.st 


ond 


AK ATARI 
BATES EEINCILDED 


BAUDWELLESS: 
BeltetVorking 


Computer Books 


Compute 


CS. 
a 


COMPUTER 
SOFTWARE 
SERVICE 


WE'VE GOT 


495 A Busse Road « Elk Grove Village, IL 60007 
(312) 439-4444 » Toll Free: 1-800-422-4912 
In Illinois: 1-800-331-SOFT 


PUTEZ CALC™TO WORK 
FOR YOU AND BENEFIT 
FROM THE RESULTS 


fear Range i 


EZ CALC™is a fully implemented GEM™ 


tana Calculater 


based spreadsheet for home and business 


Delete 
Freeze Title 
foto 


use. This is by far the most powerful 
spreadsheet available for the price. Better 
yet, all commands are mouse controlled 
for speed and ease of use. EZ CALC™ 
also uses less memory than other spread- 
sheets for the ST, leaving more room for 
your data and formulas. If you've never 
used a spreadsheet before, you'll be 
amazed how easy EZ CALC™ js to learn 
and use. The experienced user will love 


= 
+ 


Replicate 
Replicate Cell 
Set 


juan Width 
Sort 
Lit Screen 


the speed of a mouse controlled spread- 
sheet. 


MOUSE CONTROL 


Extensive use of the GEM™ windows 
makeEZ CALC™4 fast, extremely easy- 
to- use spreadsheet. With over 50 
commands available from the mouse, 
the ease of use is unsurpassed. Imagine 
being able to move or copy an entire 
column of figures with a simple mouse 
control. 


EZ CALC “includes an easy to use 10 
key calculator that can be pulled down 
at anytime and operated either by 
mouse or keyboard. With the point of a 
mouse, the results of the calculation can 
then be transferred to the cell of your 
choice. 


ONLY $69.95 


FEATURES 


» 300 columns by 999 rows 

v Extensive use of GEM™ windows 

v All commands are under mouse 
control 

v Built in 10 keypad calculator 

v On-line help windows (No commands 
to memorize) 

vy Built in sort routine 

v Developed exclusively for the Atani'S 

vy 10 macros controlled by the function 
keys 

 Split-screen capabilities 

w Note Pad 


GEM is a Trademark af DIGITAL RESEARG 
EZ CALCis a Trademark of ROYAL SOFTV 


NOTE PAD 


EZ CALC™ ets you attach a personal 
note of up to 4 lines to any cell. The cell 
is then highlighted to remind you there 
is a note attached. For example, you 
could attach a note to the insurance cell 
of your personal finance spreadsheet 
reminding you that the cell applied only 
to car and home insurance. The note pad 


fe FULL FEATURED DEMO OF EZ CALC AVAILABLE FOR $5. REFUNDABLE WITH PURCHASE. ir can be pulled down at any time. 


Only 24.95 


For The Atari ST™ 


Help Calc ™ 


———S— 
© 11 preprogrammed templates for use 
withEZ CALC™6, VIP Professional” 
* load-and-go and these templates will 
take the work out of tedious 
spreadsheet setup. 
Templates include: 
- Check Register 
Depreciation schedules 
Investment Portfolio Analysis 
Name & Address directory 
Home Inventory 
Loan Amortization Schedules 
Personal Finance Statement a 
and more VIP PROFESSIONAL is a Trademark of 
Vip TECHNOLOGIES. 


ONLY $39.95 
+ $5.00 Min. Shipping & Handling 


Custom made just for the ST, beautifully 
finished stand to hold your ST monitor, 2 disk 
drives, a modem, disk files, ETC 


COMPUTER 


(mms RS _*_ ORDERS ONLY, PLEASE & 


ALACE 


OPEN M-F. 9-5 Sal 10-4 (Pacific Time) 
2160 W 11th Avenue, Eugene, Oregén 97402 


VISA /; 


a9 


DELUXE DUST COVERS 


PROTECT yoyp EQUIPMENT 


Deluxe Leather Grain 


Made in Oregon 
Custom fitted, attractive leather brown color 


© KEY PAD—ATAH| OX85 © PRINTER—ATAR| 1020 
4 99 « ReconDER—A 4A) 1011 


5 © COMPUTERS—400/300 600/800) 
9? = DISK ORIVES—AsTRS 1620. ATARI + 
ST HARD ORIVE INDUS GT. PER! 
THAK @ PRINTERS—ATARI 1025) AXIOM SLP/GLP. 
ChIVATE 13 RECORDERA° ARI 410/* MODEM—A°ARI 1900 


3 “= COMPUTER_ATAR] 520/ 104051 « PRINTERS —ATAHI 825 
E AXIDM 550. CITOH/PROWRITER #510. CPA B0/EP-150 
EPSON MX/RX/LX/FXBO Ws & W/O TAA 
GEMINV/STAR SG 10/X. PANASONIC 1031 1092 RITEMAN 11 PLUS 


‘© MONITORS—6/W G5 MONITO! 
# PRINTERS—=PSON FX 100/165 


ANIKA MA) 10 


as 


USE YOUR CREDIT CARD & CALL 
] Toll Free 1-800-452-8013 


For Information, Call (503) 683-5361 
Prices subject to change without notice 


There's never a penally forusing your credit card! 


™ Only $29.95 
HELPMATE "ro. tne wo sr 
HELPMATE'™™ —|NCLUDES: 

* 10 Key calculator 


+ Appointment calendar with alarm functions 
* Telephone/name index 


All in one program 


TIwao. 


OCar7 


The best part is that HelpMate stays “hidden” in 
memory until needed, and then car be called up 
use, even while another program is running, The 

down menus can be used with most ST programs oF 
themselves. 


Coming Soon!! 


INVENTORY only $99.95 
MASTER ™ For The Atari ST~ 


INVENTORY MASTER ™ is a power- 
ful, Inventory control and Report genera 
tion program. It will do more than just 
keep track business inventory, such as: 
detailed report generation, fast and easy 
data retrieval, versatile data entry, takes 
the work out of decision making, plus 
much more. 


* 


SHIPPING INFO. Minimum $2 90 Ground $4 75 4\ 
Cost depends an weight Call (503) 683-536! for info 
WARRANTY INFO. Everyihing that we sell is warrar 
the manufacturer If any em purchased from 

form properly when you receive it. call us at (5 

sa that we can assist you No returned merchand 
wilhout dulhonzation Qefective software will be 
wilt another copy of the same program atherwise 
ware Is returnable 


«2 Day Air Shipping AVAILABLE * 


* 


